Составьте на паскале программу которая запрашивает возраст двух детей саши и маши, а затем выводит информацию о том, кто из них старше

uses crt;
var

  a,b:integer;
begin
  write('Введи возраст Саши: '); read(a);

  write('Введи возраст Маши: '); read(b);

  writeln;
  if a>b then write('Саша старше Маши');
  if a<b then write('Маша страше Саши');
  if a=b then write('Маша и Саша - ровесники');
end.