Tin học viết chương trình tính tổng 1+2+3+…+n cho nói xíu: mình tuyển thành viên cho nhóm programmer 24/07/2021 By Julia viết chương trình tính tổng 1+2+3+…+n cho nói xíu: mình tuyển thành viên cho nhóm programmer
Program Tinh_tong Uses Crt; Var i, N : integer; S: longint; Begin Clrscr; Write ( ‘Cho N=’); Readln(N); S:= 0 For i:= to N do S:= S=i; write(‘S=’S); Readln; End. Chúc bạn học tốt đây là bài thầy mình dạy nên mình chép lại nha Trả lời
program ct; uses crt; var s,i,n:integer; begin clrscr; write(‘nhap n:=’);readln(n); s:=0; for i:=1 to n do s:=s+i; writeln(‘tong la:’,s); readln end. Trả lời