Viết chương trình nhập một số nguyên n, In ra màn hình n là số dương hay âm, chẵn hay lẻ và có chia hết cho 2 và 5 không
2 câu trả lời
program ct;
uses crt;
var n:integer;
begin clrscr;
write('Nhap so n: '); readln(n);
if n>0 then writeln(n,' la so duong') else writeln(n,' la so am');
if n mod 2=0 then writeln(n,' la so chan') else writeln(n,' la so le');
if (n mod 2=0) and (n mod 5=0) then writeln(n,' chia het cho 2 va 5')
else writeln(n,' khong chia het cho 2 va 5');
readln;
end.
Học tốt!
Program Hotboy ;
Uses crt;
Var n: longint;
Begin
Clrscr;
Write('nhap n');
Readln(n);
If (n mod 2=0) and (n mod 5=0) then write(n,'chia het cho 2 va 5')
Else
Write(n,'khong chia het cho 2 va 5');
If ( n > 0) then write(n,'la so duong') else write(n,'la so am');
If (n mod 2=0) then write(n,'la so chan') else write(n,'la so le');
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
