Viết chương trình tính tổng n số tự nhiên đầu tiên. Với n đc nhập vào từ bàn phím 07/08/2021 Bởi Abigail Viết chương trình tính tổng n số tự nhiên đầu tiên. Với n đc nhập vào từ bàn phím
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 cua n so tu nhine la:’,S); readln end. Bình luận
Cho mình câu hỏi hay nhất nhé bạn
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 cua n so tu nhine la:’,S);
readln
end.