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

- Input : ba số a, b, c

- Output : số lớn nhất trong 3 số

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

- Bước 1 : nhập a, b, c

- Bước 2 : max ← a

- Bước 3 :

- Bước 3.1 : nếu b > max thì max ← b

- Bước 3.2 : nếu c > max thì max ← c

- Bước 4 : xuất giá trị max

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

* Viết chương trình :

uses crt;

var a, b, c, max : integer;

begin

clrscr;

write('nhap gia tri a, b, c :');readln(a, b, c);

max := a;

if b > max then max := b;

if c > max then max := c;

writeln('gia tri lon nhat :', max);

readln

end.

- Input : Ba số a, b, c

- Output : Số lớn nhất trong 3 số

B1 : Nhập ba số a, b, c

B2 : Max ← a

B3:

3.1 : Nếu b > max thì max ← b

3.2 : Nếu c > max thì max ← c

B4 : Xuất giá trị max

B5 : Kết thúc chương trình

- Viết chương trình :

Program So_lon_nhat;

Uses crt;

Var a, b, c, max : integer;

Begin

Writeln('nhap cac gia tri a, b, c :');readln(a, b, c);

Max := a;

If b > max then max := b;

If c > max then max := c;

Writeln('gia tri lon nhat :', max);

Readln

End.