Câu 2:

B1: nhập n

B2: gán i←2

B3: sử dụng vòng lặp while, điều kiện là (n>1) và n không chia hết cho i thì thay đổi một lượng i

B4: nếu i←n thì ghi n là số nguyên tố

ngược lại ghi n không phải là số nguyên tố

Câu 3:

uses crt;
var a,b:longint;
begin
clrscr;
   write('Nhap a,b: '); readln(a,b);
readln
end.

Câu 2:

B1: Nhập vào số nguyên n;

B2: Nếu n<=1 thì thông báo n không phải số nguyên tố;

B3: Khởi tạo i $\leftarrow$ 2;

B4: Nếu n không chia hết cho i thì i $\leftarrow$ i+1;

B5: Nếu i=n thì thông báo n là số nguyên tố;

B6: Quay lại bước 4;

B7: Thông báo n không phải số nguyên tố.

Câu 3:

program kaito;
uses crt;
begin
   clrscr;
   write('Nhap a: '); readln(a);
   write('Nhap b: '); readln(b);
   readln
end.

CHÚC BẠN HỌC TỐT!!!