Помогите пожалуйста задачу решить ввод:а и б ,вывести результаты сравнения

Question

Помогите пожалуйста задачу решить
ввод:а и б ,вывести результаты сравнения

Answer 1

Var
  a,b:integer;
begin
  Write('вводите a,b: ');
  Read(a,b);
  if a>b then Writeln('Первое число больше')
  else
    if a    else Writeln('Числа равны')
end.

Comments

спасибо огромное

---

Пожалуйста