viết chương trình số a chia hết cho 3 có sử dụng câu lệnh điều kiện 20/07/2021 Bởi Mackenzie viết chương trình số a chia hết cho 3 có sử dụng câu lệnh điều kiện
program az; uses Crt; var a : real; begin clrscr; Write(‘nhap so a : ‘); readln(a); If (a mod 3 = 0) then Write(a,’chia het cho 3′) else Write(a,’ khong chia het cho 3′); readln end. Bình luận
program az;
uses Crt;
var a : real;
begin
clrscr;
Write(‘nhap so a : ‘); readln(a);
If (a mod 3 = 0) then Write(a,’chia het cho 3′) else Write(a,’ khong chia het cho 3′);
readln
end.