По заданному числу K (от 0 до 10) вывести его название. Например при K=2 вывести на экран <>, при K=3 вывести на экран <> и т. д

Question

Даниил Константинов

Информатика

1 июня, 23:52

По заданному числу K (от 0 до 10) вывести его название. Например при K=2 вывести на экран <>, при K=3 вывести на экран <> и т. д

+5

Ответы (1)

Знаешь ответ на этот вопрос?

София Чернова · Answer 1

Program massiv;

Const n=10;

Var a:array[1 ... n] of integer;

i, s:integer;

Begin

s:=0;

For i:=1 to n do

Begin

a[i]:=i*i;

Write (a[i]:3);

s:=s+a[i];

end;

WriteLn;

Write ('Сумма=', s);

end.