Задача на паскале

Question

Владимир Олексей Ученик (175), на голосовании 4 года назад

Ввести M. Вывести сумму 1/4+1/9+...+1/M²

Answer 1

program sum; var s:real; k,M:longint; begin write('M(≥2) = '); readln(M); s:=0; for k:=2 to M do s:=s+1/k/k; writeln(s:0:16) end.

Answer 2

Famous Epheria Профи (917) 4 года назад

program sum;
var s:real;
k,M:longint;
begin write('M(≥2) = ');
readln(M); s:=0;
for k:=2 to M do s:=s+1/k/k;
writeln(s:0:16) end.

а сколько еще "переводов строк" пропущено...

Answer 3

program sum;
var s:real;
k,M:longint;
begin write('M(≥2) = ');
readln(M); s:=0;
for k:=2 to M do s:=s+1/k/k;
writeln(s:0:16) end.