program tongs;
uses crt;
var n,S,i: integer;
begin
clrscr;
writeln('Nhap n = '); read(n);
S:=0;
for i:= 1 to n do
S:=S+i;
writeln('Tong S = ',S);
readln
end.
program tongs;
uses crt;
var n,S,i: integer;
begin
clrscr;
writeln('Nhap n = '); read(n);
S:=0;
for i:= 1 to n do
S:=S+i;
writeln('Tong S = ',S);
readln
end.
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 S = 1+2+3+...+1/n. Trong đó n là số nguyên được nhập từ bàn phím
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 n số tự nhiên : S =1+2+3+...+ n, với n là số tự nhiên được nhập từ bàn phím ( có sử dụng khai báo biến mảng )
1.Viết chương trình nhập số nguyên n. Hãy tìm chữ số lớn nhất của n.
2. Viết chương trình nhập từ bàn phím 2 số nguyên a và b. Tìm BCNN của a và b
Viết chương trình pascal nhập n số nguyên từ bàn phím. Thực hiện
+ Xuất ra màn hình các số vừa nhập
+Tính tổng các số vừa nhập và xét xem tổng đó có phải là số nguyên tố không ?
Làm giúp với !
Viết chương trình pascal nhập n số nguyên từ bàn phím. Thực hiện
+ Xuất ra màn hình các số vừa nhập
+Tính tổng các số vừa nhập và xét xem tổng đó có phải là số nguyên tố không ?
Làm giúp với !
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)