viết chương trình nhập số nguyên x y từ bàn phím và in ra màn hình kết quả kiểm tra xem tổng của chúng cs chia hết cho 5 ko (mai mik thi r mong các bạn tl gùm)
viết chương trình nhập số nguyên x y từ bàn phím và in ra màn hình kết quả kiểm tra xem tổng của chúng cs chia hết cho 5 ko (mai mik thi r mong các bạn tl gùm)
Program kt_hk_1;
Uses crt;
Var x,y: integer;
Begin
Clrscr;
Write(‘nhap x va y :’); readln(x,y);
If x+y mod 5= 0 then writeln(x+y,’chia het cho 5′) else writeln(x+y,’khong chia het cho 5′);
Readln;
End.