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.
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.