For(i = 0; i < N; i++)
{
sum += a[i] * a[i];
}
Var
n, a, b, i, j: integer;
ar: array[1..10000]of integer;
begin
read(n, a, b);
ar[1] := a;
ar[2] := b;
for i := 3 to n do
begin
for j := 1 to i - 1 do
begin
ar[i] := ar[i] + ar[j];
end;
ar[i] := ar[i] + i;
end;
for i := n downto 1 do write(ar[i],' ');
end.
Название команды :купи билет - 4)получи билет.
название команды :займи своё место - 3)найди свой ряд.
Мощность алфавита 2 в 4 степени=16
Библиотеки нужно добавить самому.
Программу проверила на компиляторе,можно с ней работать.
Там есть в условии небольшая опечатка, в условии одном дана С (большая), но сама она нигде не дана, поэтому я использовала с (маленькую).
Если вдруг нужно будет самому ввести а, b и c, добавь сюда функцию cin >> a >> b >> c. Если нет, заранее приравняй к этим переменным какие-то значения.
int main()
{
int M, a, c, b, S, f, i;
int k[6] = {0, 1, 2, 3, 4, 5};
M = (a*a - c*c)*(a-b);
for (i=0; i<7; i++)
{
if (M == k[i])
S = M/(a*c);
else S = (a-c)*M;
}
if (S == M)
f = (a*b*S)/с;
else f = S-M;
return 0;
}