Question

Viết chương trình tính tổng và giải thích cách tìm công thức tổng quát của bài toán:

\(S=\sqrt{1+\sqrt{2+....+\sqrt{n-1+\sqrt{n}}}}\) vơi nhập từ bàn phím.

(*Kiến thức mới: SQRT(x) :\(\sqrt{x}\))

Answer 1

program Lam_Lui;

var S:extended;

i,n:integer;

begin

clrscr;

write('Nhap n = ');

readln(n);

S:=0;

for i:=n downto 1 do S:=sqrt(i+S);

write('Sai tự chịu: ',S);

readln;

end.

Answer 2

program Lam_Lui;

var S:extended;

i,n:integer;

begin

clrscr;

write('Nhap n = ');

readln(n);

S:=0;

for i:=n downto 1 do S:=sqrt(i+S);

writeln('Sai tự chịu: ',S);

readln;

end.

Answer 3

Trong MSWLOGO:

To tinhtoan :n
CS
make "A 0
FOR [i :n 1 -1][Make "A :A+sqrt(:i+:A)]
RT 90 LABEL (List "Tong "la: :A)
end

Mọi thắc mắc xin gửi về tổng đài: 1900, 1 ko ko có

Answer 4

progam giaibaitaphoc24_vn;

var n , s : real;

begin

write(`nhap bieu thuc s : ');

readln(n);

s:=sqrt(1+sqrt(2+sqrt(...sqrt(n-1+sqrt(n));

writeln('gia tri bieu thuc s = `, s:7:3);

readln;

end

Answer 5

program fds;

uses crt;

var i,n,S: integer;

begin

clrscr;

write('n=');

readln(n);

for i:=1 to n do S=sqrt(S+sqrt(i));

readln;

end.

bạn cứ làm thử đi nhé

Answer 6

mình không biết bạn biết hay không

sqr(x): x²