* Xác định bài toán :

- Input : số nguyên có ba chữ số

- Output : hai chữ số cuối cùng của số nguyên

* Mô tả thuật toán :

- Bước 1 : nhập số nguyên ba chữ số

- Bước 2 : b ← (n mod 100) div 10;

- Bước 3 : c ← n mod 10;

- Bước 4 : in ra màn hình giá trị b, c lần lượt là hai số cuối cùng

- Bước 5 : kết thúc

* Viết thuật toán :

program tinh;
uses crt;
var b, c,  n : integer;
begin
clrscr;
write('nhap so n :');readln(n);
b := (n mod 100) div 10;
c := (n mod 10 );
writeln('hai chu so cuoi cung cua so nguyen la :', b, c);
readln
end.

XĐ:

Inp:nhập 1 số có 3 chữ số

Out: in ra màn hình 2 chữ số cuối

Thuật toán:

B1:nhập số

B2:b<--số mod 100

B3:Xuất ra màn hình 2 số cuối

B4: kết thúc

Vt chg trình:

uses crt;

var a,b:integer;

begin

write('nhap so co 3 chu so: ');readln(a);

b:=a mod 100;

writeln('2 so cuoi la:',b);

readln;

end.