Pascal

вычислить сумму 1^4+2^4 + ... + N^4 (while, repeat until или For)

Question

Информатика

Бориска

30 августа, 16:04

Pascal

вычислить сумму 1^4+2^4 + ... + N^4 (while, repeat until или For)

+4

Ответы (1)

Знаете ответ на вопрос?

Лексаня · Answer 1

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.

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

Pascal

вычислить сумму 1^4+2^4 + ... + N^4 (while, repeat until или For)