Chỉ ra các test của bài toán: Kiểm tra tính chẵn lẻ của một số nguyên dương cho trước

0 bình luận về “Chỉ ra các test của bài toán: Kiểm tra tính chẵn lẻ của một số nguyên dương cho trước”

1. Ý tưởng:

   Nhập số nguyên n từ bàn phím

    Nếu n chia 2 dư 0 thì thông báo ra n chẵn, ngược lại thông báo ra n lẻ

   Viết chương trình:

   Uses crt;

   Var n:integer;

    Begin

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

         If n MOD 2=0 Then

       Writeln(‘nla so chan’)

        Else

       Writeln(‘n la so le’);

     Readln;

   End.

   Bình luận

2. Ý tưởng:

   – Nhập 1 số nguyên nhập từ bàn phím.

   – Nếu số vừa nhập chia 2 dư 0 thì xuất ra màn hình số đó là số chẵn, nếu không giống như ĐK trên thì xuất ra màn hình số đó là số lẻ.

   CT:

   uses crt;
   var n:longint;
   {—Ham-kiem-tra—}
   function chanle(n:longint):boolean;
   begin
         if n mod 2=0 then begin chanle:=true; write(n,’ la so chan’); end
         else begin chanle:=false; write(n,’ la so le’); end;
   end;
   {—Chuong-trinh-chinh—}
   BEGIN
         clrscr;
         write(‘Nhap n: ‘); readln(n);
         chanle(n);
         readln;
   END.

   Bình luận