Pascal

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

Question

Информатика

Бориска

14 декабря, 04:53

Pascal

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

+3

Ответы (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)