Viết chương trình tính tổng sau :S=1+2+3+…+n sao cho tổng S nhỏ nhất >500

Question

Viết chương trình tính tổng sau :S=1+2+3+...+n sao cho tổng S nhỏ nhất >500

ngocquynh · Answer

program tong;

uses crt;

var n,S: integer;

Begin

while S<=500 do

begin

n:=n+1;

S:=S+n;

end;

write(‘S = ‘,S,’ , n = ‘,n);

readln

End.

halan · Answer

cho m&igrave;nh ctlhn nha, cảm ơn cậu    500'>

0 bình luận về “Viết chương trình tính tổng sau :S=1+2+3+…+n sao cho tổng S nhỏ nhất >500”