Tin học nhà mọi người giúp e với??? Viết phương trình tính tổng của 50 số tự nhiên đầu tiên
2 câu trả lời
Bước 1: Nhập N ( nhập N=50)
Bước 2: i <= 0, S <= 0
Bước 3: i <= i + 1
Bước 4: 4.1 nếu i > N thì kết thúc thuật toán và thông báo kết quả
4.2 S <= S + i rồi quay lại bước 3
Program Hotboy ;
uses crt;
Var i,s : integer;
Begin
Clrscr;
S:=0;
For i:=1 to 50 do
S:=S+i; i:=i+1 ;
Write('tong 50 so dau tien la. ',S);
Readln
End.