sử dụng hàm if dạng thiếu Nhập a, cho biết a là số chẵn hay số lẽ? Nhập c, cho biết c là số âm hay số dương (kể cả c=0)? Nhập a, cho biết a có chia hế

0 bình luận về “sử dụng hàm if dạng thiếu Nhập a, cho biết a là số chẵn hay số lẽ? Nhập c, cho biết c là số âm hay số dương (kể cả c=0)? Nhập a, cho biết a có chia hế”

1. Program BTT;
   Uses crt;
   Var a,c: longint;
   Begin
           Clrscr;
           Write(‘Nhap a: ‘); Readln(a);

           //Cho biet a chan hay le

           If a mod 2 = 0 then Write(a,’ la so chan’);
           If a mod 2 = 1 then Write(a,’ la so le’);
           Writeln;

           Write(‘Nhap c: ‘); Readln(c);

           //Cho biet c am hay duong

           If c=0 then Write(c,’ khong phai so am cung khong phai so duong’);
           If c>0 then Write(c,’ la so duong’);
           If c<0 then Write(c,’ la so am’);
           Writeln;

           Write(‘Nhap a: ‘); Readln(a);

           //Cho biet a co chia het cho 2 va 9 khong

           If (a mod 2=0) and (a mod 9=0) then Write(a,’ chia het cho 2 va 9′);
           If (a mod 2<>0) or (a mod 9<>0) then Write(a,’ khong chia het cho 2 va 9′);
           Readln
   End.

   Bình luận

2. đây nhé bạn

   

   Bình luận