Question

Viết chương trình Pascal nhập vào 2 số a, b in ra màn hình số lớn hơn. Dùng câu lệnh if... then... else…

Answer 1

Var a,b:real;

Begin

Write('a = ');readln(a);

Write('b = ');readln(b);

If a > b then write('So lon la ',a:10:2)

Else if b > a then write('So lon la ',b:10:2)

Else write('Hai so bang nhau');

Readln;

End.