var a:integer;
begin
a:=500;
writeln('cac so chia het cho 7 la:');
while a>=200 do
begin
if a mod 7 = 0 then writeln(a);
a:=a-1;
end;
readln;
end.
var a:integer;
begin
a:=500;
writeln('cac so chia het cho 7 la:');
while a>=200 do
begin
if a mod 7 = 0 then writeln(a);
a:=a-1;
end;
readln;
end.
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 3 trong phạm vi từ 1 đến N,sau đó in ra màn hình
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 3 trong phạm vi từ 1 dến N, sau đó in ra màn hình.
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 5 trong phạm vi từ 1 dến N, sau đó in ra màn hình.
Bài 6: Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện và câu lệnh lặp for to do để tính tổng các giá trị chia hết cho 2 và chia hết cho 3 trong phạm vi từ 1 dến N, sau đó in kết quả ra màn hình.
Viết chương trình từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 5 trong phạm vi 1 đến N. Rồi in kết quả ra màn hình
giúp mình với cảm ơn!
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có chia hết cho 3 hoặc 5 hay không, thông báo ra màn hình.
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có chia hết cho 3 hoặc 5 hay không, thông báo ra màn hình.
viết chương trình nhập vào bàn phím số nguyên dưng N,sử dụng câu lệnh điều kiện để tính số lẻ trong phạm vi từ 1 đến N, sau đó in ra màn hình
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có đồng thời chia hết cho 3 và 5 hay không, thông báo ra màn hình.