Информатика 9 класс турбо паскаль

var a, b: real;
{а – возраст Маши; b – возраст Cаши}
begin
readln (a, b);
if A>B then
writeln (‘Маша старше Саши’)
else
writeln (‘Саша старше Маши’);
readln;
end.

Задание.Доработать программу таким образом, чтобы в случае ввода
a=b программа выводила: ‘Саша и Маша ровесники’.

Помогите дам 50

пунктов первому!!!

var a, b: real;{а – возраст Маши; b – возраст Cаши}beginreadln (a, b);if A>B thenwriteln ('Маша старше Саши')else if a=b thenwriteln('Саша и Маша ровесники')elsewriteln ('Саша старше Маши');readln;end.