iết chương trình tính tổng từ 1 ..n . Với n là số nguyên (n>1) được nhập từ bàn phím.
2 câu trả lời
Program Hotboy;
Uses crt;
Var s:real;
I,n:integer;
Begin
Clrscr;
Write('nhao so n'); readln(n) ;
For i:=1 to n do
S:=S+i ; i:=i+1;
Writeln('tong tu 1 den ',n,' la',S);
Readln
End.
Vote mình nha :3
program bt;
uses crt;
var s,i,n:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do s:=s+i;
writeln('Tong: ',s);
readln;
end.
Câu hỏi trong lớp
Xem thêm