Viết phương trình: Kiểm tra x là số có chia cho 5 không? (Biết x được nhập từ bàn phím )
Viết phương trình: Kiểm tra x là số có chia cho 5 không? (Biết x được nhập từ bàn phím )
By Athena
By Athena
Viết phương trình: Kiểm tra x là số có chia cho 5 không? (Biết x được nhập từ bàn phím )
đây bạn
program baitap;
uses crt;
var x:integer;
begin
readln(x);
if x mod 5 = 0 then
writeln(x,’ chia het cho 5′)
else writeln(x,’ khong chia het cho 5′);
readln;
end.