Помогите написать программу вычесления для заданного натурального числа N:

S=1+√2+√3 + ... + √N

Question

Информатика

Стеха

29 июля, 05:02

Помогите написать программу вычесления для заданного натурального числа N:

S=1+√2+√3 + ... + √N

+3

Ответы (1)

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

Алюся · Answer 1

Uses crt;

var i, N:integer;

s:real;

begin

s:=0;

write ('вв N') ;

read (N) ;

for i:=1 to N do

s:=s+sqrt (i) ;

write ('otvet:', s) ;

readkey

end.

Помогите написать программу вычесления для заданного натурального числа N:S=1+√2+√3 + ... + √N

Помогите написать программу вычесления для заданного натурального числа N:

S=1+√2+√3 + ... + √N