Запольский
4 год назад
Написать программу на паскале.Найти сумму слагаемые
ОТВЕТЫ
Stein Karin
Oct 24, 2020
Program n1;
var i,sum,n: integer;
begin
sum:=0;
write('введите кол-во слагаемых: ');
readln(n);
for i:=1 to n do sum:=sum+i*i;
writeln(sum);
end.
var i,sum,n: integer;
begin
sum:=0;
write('введите кол-во слагаемых: ');
readln(n);
for i:=1 to n do sum:=sum+i*i;
writeln(sum);
end.
419
Смежные вопросы:
