Bài 6. Câu lệnh điều kiện

TP

viết công thức pascal nhập số n từ bàn phím . xuất ra màn hình các số chia hết cho 2 và 5 từ 1 đến n

 
NT
20 tháng 12 2020 lúc 12:22

uses crt;

var n,i:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  if (i mod 2=0) and (i mod 5=0) then write(i:4);

readln;

end. 

Bình luận (0)
BT
20 tháng 12 2020 lúc 20:04

Bình luận (0)
BT
20 tháng 12 2020 lúc 20:06

cách này cũng đúng nhá

Bình luận (0)

Các câu hỏi tương tự
TP
Xem chi tiết
SX
Xem chi tiết
DB
Xem chi tiết
DB
Xem chi tiết
DB
Xem chi tiết
H24
Xem chi tiết
LA
Xem chi tiết
CJ
Xem chi tiết
BT
Xem chi tiết