VCT nhập vào một số n.In ra màn hình các số chia hết cho 3 và 2 từ 1-n.Lưu lại với Bai 3 mình học ngôn ngữ pascal và mới học tới 4 kiểu dữ liệu:real,string,char,integer và chụp hình giúp mình nhé:)
2 câu trả lời
bạn xem ảnh ạ
code:
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 3=0)then write(i:5);
readln
end.


