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.
Xem chi tiết
Học vẽ hình không gian với GeoGebra
uses crt;
var a:integer;
begin
clrscr;
write('Nhap a='); readln(a);
if (a mod 3=0) and (a mod 5=0) then writeln(a,' dong thoi chia het cho 3 va 5')
else writeln('Khong thoa dieu kien');
readln;
end.
Đúng 1
Bình luận (0)
Ý nghĩa của câu lệnh khai báo biến pascal
Var: Dùng để khai báo những biến cần sử dụng trong chương trình
Đúng 0
Bình luận (0)