uses crt;
var n,i,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n do
t:=t+i;
writeln(t);
readln;
end.
Đúng 1
Bình luận (0)
Lập trình đơn giản
Các câu hỏi tương tự
viết chương trình tính tổng :S = 5+10 +15+...+n. trong đó số nguyên nhập từ bàn phím
Viết chương trình tính tổng các dãy số nhập từ bàn phím, đến số 0 thì xuất ra kết quả các số vừa nhập
viết chương trình tính tổng S=1+2+3+...+n.Trong đó n là số nguyên nhập từ bàn phím
Viết chương trình tính tổng từ N-M, N và M được nhập từ bàn phím
Viết chương trình tính tổng S = 1+2+3+...+1/n. Trong đó n là số nguyên được nhập từ bàn phím
Em hãy viết chương trình tính tổng các số chẵn từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)
Em hãy viết chương trình tính tổng các số lẻ từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)
Viết chương trình nhập từ bàn phím hai số nguyên a và b. Thực hiện tính và in ra màn hình tổng và hiệu hai số đó
Đọc tiếp
Viết chương trình nhập từ bàn phím hai số nguyên a và b. Thực hiện tính và in ra màn hình tổng và hiệu hai số đó
Viết chương trình nhập 5 số nguyên từ bàn phím. In ra tổng (hoặc hiệu, hoặc tích) các
số chẵn (hoặc lẻ) vừa nhập.