viết chương trình nhập vào 1 số m kiểm tra và in ra màn hình số đó có chia hết cho 5
2 câu trả lời
Program Kiem_tra_so;
Uses Crt;
Var m: integer;
Begin
clrscr;
Write('Nhap so m: '); Readln(m);
If m mod 5 = 0 then write(m, 'chia het cho 5');
Else m mod 5 <> 0 then write'm, 'khong chia het cho 5');
Readln;
End.
Program kiemtra;
Uses crt;
Var m : integer ;
Begin
Clrscr;
Write(' nhap so m',m);
Readln(m);
If m mod 5 =0 then writeln(m,' chia het cho 5') else writeln( m,' khong chia het cho 5');
Readln
End.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
