Program HOC24;
var i,n: integer;
t: longint;
begin
write('Nhap n: '); readln(n);
t:=0;
for i:=1 to n do if i mod 2=0 then t:=t+i;
write('Ket qua: ',t);
readln
end.
Program HOC24;
var i,n: integer;
t: longint;
begin
write('Nhap n: '); readln(n);
t:=0;
for i:=1 to n do if i mod 2=0 then t:=t+i;
write('Ket qua: ',t);
readln
end.
Viết chương trình tính tổng các số chẵn từ 1 đến n với n được nhập từ bàn phím (viết cho câu lệnh while...do). Mik đang cần gấppp
viết chương trình gồm 1 dãy n số nguyên a)tính tổng các phần tử của dãy dãy có bao nhiêu số chẵn tính tổng các số chẵn đó
viết chương trình gồm 1 dãy n số nguyên a)tính tổng các phần tử của dãy b)dãy có bao nhiêu số chẵn tính tổng các số chẵn đó SOSSSSS
Câu 1: Viết chương trình sử dụng biến mangrcho dãy số nguyên
-Tìm giá trị nhỏ nhất ( Lớn nhất )
-Tìm tổng các giá trị của dãy
-Tìm tổng của các số nguyên dương ( nguyên âm )
-Tìm tổng các số lẻ (Tống chẵn )
-Tìm tổng các số là bội của 5
-Viết n số nguyên sắp xếp theo thứ tự tăng dần
Câu 1: Viết chương trình sử dụng biến mangrcho dãy số nguyên
-Tìm giá trị nhỏ nhất ( Lớn nhất )
-Tìm tổng các giá trị của dãy
-Tìm tổng của các số nguyên dương ( nguyên âm )
-Tìm tổng các số lẻ (Tống chẵn )
-Tìm tổng các số là bội của 5
-Viết n số nguyên sắp xếp theo thứ tự tăng dần
Câu 1 : Viết chương trình nhập vào dãy số gồm n phần tử. Tính và in ra màn hình tổng các số chẵn, các số lẻ của dãy vừa nhập
Bài 1 : Viết chương trình in các số lẻ từ n đến m ( với n , m được nhập từ bàn phím ) , theo hàng ngang mỗi số cách nhau một khoảng trắng
Bài 2 : Viết chương trình in các số chẵn từ 1 đến 100
Giúp mk nha
Viết chương trình tính tổng của các số tự nhiên n đến tổng đầu tiên lớn hơn 1001
Giúp mk vs ạ chiều nay mk thi cuối kì 2 gòi