Предмет: Информатика,
автор: lerika99
составить программу нахождения суммы квадратов чилел от 1 до 100
Ответы
Автор ответа:
0
program r;
var a:longint;
i:byte;
begin
a:=0;
for i:=1 to 100 do a:=a+sqr(i);
writeln(a);
end.
Интересные вопросы
Предмет: Английский язык,
автор: 1kasting1
Предмет: Алгебра,
автор: jigitkz
Предмет: Математика,
автор: Аноним
Предмет: Алгебра,
автор: ДаШа150199
Предмет: Математика,
автор: arinka116