program TinhTong;
var n, s,i: integer;
begin
write('Nhap vao n: ');
readln(n);
s := 0;
for i := 5 to n step 5 do
begin
s := s + i;
end; writeln('Tong cua day so la: ',s);
readln;
end.
program TinhTong;
var n, s,i: integer;
begin
write('Nhap vao n: ');
readln(n);
s := 0;
for i := 5 to n step 5 do
begin
s := s + i;
end; writeln('Tong cua day so la: ',s);
readln;
end.
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=1+2+3+...+n.Trong đó n là số nguyên 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 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 !
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.
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 )