Для заданного натурального числа n написать программу вычисления выражения s=√1+√2+√3+√4+...+√n подстановка задачи i=1..n,s=0,s=s+√i
Для заданного натурального числа n написать программу вычисления выражения s=√1+√2+√3+√4+...+√n подстановка задачи i=1..n,s=0,s=s+√i
Гость
Ответ(ы) на вопрос:
ГостьUses Crt;
var
i,n : integer;
S:Real;
Begin
ClrScr;
Write('Input N: ');
ReadLn(n);
s:=0;
for i:=1 to n do
s:=s+Sqrt(i);
Write(S);
End.
Не нашли ответ?
Похожие вопросы