Найти сумму квадратов чисел от 1 до 10 программа free pascal

olgaolgahelga olgaolgahelga    1   28.07.2019 23:00    0

Ответы
Muna222 Muna222  07.08.2020 16:54
Program summakvadratov (input, output);
var I, a:integer;
begin
a:=0;
for I:=1 to 10 do
a:=a+sqr(I);
writeln (a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика