Предмет: Информатика,
автор: kaparoc77
Посчитать сумму квадратов первых 10 чисел.(на паскале ришить)
Ответы
Автор ответа:
0
var sum,i:integer;
begin
for i:=1 to 10 do
sum:=sum+i*i;
writeln(sum);
end.
begin
for i:=1 to 10 do
sum:=sum+i*i;
writeln(sum);
end.
Похожие вопросы
Предмет: Английский язык,
автор: AnechkaGo
Предмет: Химия,
автор: tanya166b
Предмет: Русский язык,
автор: annadmitrievna0912
Предмет: Литература,
автор: milton18010
Предмет: Математика,
автор: Гость00