viết chương trình nhập vào số nguyên a.In ra màn hình nếu số đó là số lẻ.

0 bình luận về “viết chương trình nhập vào số nguyên a.In ra màn hình nếu số đó là số lẻ.”

1. Program BTT;
   Uses crt;
   Var a: longint;
   Begin
           Clrscr;
           Write(‘Nhap a: ‘); Readln(a);
           If a mod 2 = 1 then Write(a,’ la so le’)
           Else Write(a,’ khong phai so le’);
           Readln
   End.

   Bình luận

2. program b1;

   uses crt;

   var a : longint;

   begin

    clrscr;

    write(‘cho biet a = ‘);

    readln(a);

    if a mod 2 = 0 then write(a,’ la so chan’)

    else write(a,’ la so le’);

    readln;

   end.

   Bình luận