Используя цикл типа FOR ,вывести на экран квадраты чисел от 1 до 10. Подсчитать сумму полученных результатов.
Ответы
Ответ дал:
0
Ответ дал:
0
Writeln (l*l) или (1*1)??
Ответ дал:
0
l*l
Ответ дал:
0
Program n1;
var i,sum: integer;
begin
sum:=0;
for i:=1 to 10 do
begin
writeln(i*i);
sum:=sum+i*i;
end;
write('сумма: ',sum);
end.
var i,sum: integer;
begin
sum:=0;
for i:=1 to 10 do
begin
writeln(i*i);
sum:=sum+i*i;
end;
write('сумма: ',sum);
end.
Приложения:
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад