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…

Giải chi tiết giúp mình nhé

Answer 1

Program solonhon;

var a,b: integer;

begin

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

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

if a> b then write(a);

if a<b then write(b);

if a=b then write('2 so bang nhau');

readln

end.

Answer 2

Program HOC24;

var a,b: integer;

begin

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

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

if a>b then write(a) else write(b);

readln

end.

Answer 3

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

if a>b then write(a)

else write(b);

readln;

end.