Написать программу для нахождения значения переменной S по формуле: S=1n 1 + 1n 2 + ... + 1n n .
Написать программу для нахождения значения переменной S по формуле: S=1n 1 + 1n 2 + ... + 1n n .
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var i,n,s:integer;
begin
read(n);
for i:=1 to n do
s:=s+i*n;
writeln(s);
end.
Не нашли ответ?
Похожие вопросы