input a,b

output số  lớn nhất

b1 nhập A, B

b2 nếu A>B thì xuất A>B 

hoặc A<B

b3 kết thúc

sơ đồ:

uses crt;

var a,b:longint;

write('a,b');readln(a,b);

if a>b then write(a,'>',b) else write(a,'<',b);

readln

end.

1/ 

input: a,b

output: nếu a>b thì in ra màn hình

mô tả thuật toán

B1: nhập a,b

B2: nếu a>b đến bước 3 còn nếu ko đúng đến bước 4

B3: in ra màn hình a>b

B4: nếu không đúng in ra màn hình a<b

B5: kết thúc thuật toán

sơ đồ rẽ nhánh: bạn chỉ cần đóng khung các cái nội dung ở thuật toán trên là đc

nhập a,b

      ↓

nếu a>b thì in ra màn hình  → sai in ra màn hình → a<b

      ↓

    a>b

2/ viết chương trình

uses crt;

var a,b: integer;

begin

clrscr;

write ('nhap a: ');   readln (a);

write ('nhap b: ');   readln (b);

if a>b then writeln (a,'>',b) else writeln (a,'<',b);

readln;

end.