Lập trình đơn giản

Pikachu

Viết chương trình pascal in ra màn hình các số chia hết cho 6 từ 1 đến 100

Tú Nguyễn
16 tháng 1 2018 lúc 5:08

dễ mà bạn

Bình luận (0)
Tú Nguyễn
16 tháng 1 2018 lúc 5:12

var n,i:integer;
begin
write('n=');readln(n);
for i:=1 to 100 do
if i mod 6=0 then write(i,' ');
readln;
end.

Bình luận (0)

Các câu hỏi tương tự
duy lê
Xem chi tiết
đức minh
Xem chi tiết
nguyễn vũ thành công
Xem chi tiết
tan nhat
Xem chi tiết
Quỳnh
Xem chi tiết
Hưng Quốc
Xem chi tiết
Chóii Changg
Xem chi tiết
Trần Minh Huy
Xem chi tiết
dinhnguyentuhuy
Xem chi tiết