запишите программу условного оператора,в которой сравнивают значение переменных А и В​

begin

var (a,b):=ReadInteger2('Введите a,b->');

if a>b then Writeln(a,' больше.') else

if a=b then Writeln(a,' равно ',b) else Writeln(b,' больше.');

end.

Программа - pascal