Pascal вычислить сумму 1^4+2^4++n^4 (while, repeat until или for)

lhukotunl lhukotunl    1   01.07.2019 09:20    0

Ответы
аня535767 аня535767  02.10.2020 17:18
Program al;
var n,i,s:integer;
begin
writeln('vvedite n =');
readln(n);
s:=0;
for i := 1 to n do
s:=s+sqr(i)*sqr(i);
writeln ('s=',s);
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика