Bài 1:

INPUT thuộc bước 1 ở phần "Nhập N vào từ bàn phím"

OUPUT thuộc bước 2 ở phần "Thông báo N là số nguyên chẵn và kết thúc" và thuộc bước 3 ở phần "Thông báo N là số nguyên lẻ và kết thúc"

Bài 2:

Uses Crt;

Var a, b : Longint;

Begin

   Clrscr;

   Readln( a ); Readln( b );

   Write( a + b );

   Readln;

End.

Bài 3:

Uses Crt;

Var a, b, c : Longint;

Begin

   Clrscr;

   Readln( a ); Readln( b );

   c := a; a := b; b := c;

   Write( ' a = ', a, ', b =  ', b );

   Readln;

End.

Bài 1:

Input: N

Output: N chẵn hoặc lẻ

Bài 2:

Input: a và b

Output: a+b

Bài làm

Uses crt;

Begin

    Readln(a,b);     

    Writeln('a+b=',a+b);

    Readln

End.

Bài 3:

Input: a và b

Output: a và b sau khi tráo đổi giá trị

Bài làm

Uses crt;

Var a,b,x: longint;

Begin

    Readln(a,b); 

    x:=a; a:=b; b:=x;

    Writeln('a=',a,' b=',b);

    Readln

End.