Составьте алгоритм, по которому на компьютере будет происходить следующее: в переменную s вводится возраст саши, в переменную м вводится возраст маши. в качестве результата на экран выводится фраза «саша старше маши» или «маша старше саши» (предполагаем, что кто-нибудь из них обязательно старше)

Program SM;
var
  S,M:Integer;
begin
  writeln('');
  writeln('*     Саша или Маша?     *');
  writeln('*    Сейчас узнаем...    *');
  writeln('');
  write('Введите возраст Саши');
  readln(S);
  writeln('Теперь введите возраст Маши');
  readln(M);
  writeln('');
  writeln('*         Итак...        *');
  if S>M then writeln('*    Cаша старше Маши    *')
  else   writeln('*    Маша старше Саши    *');
  writeln('');
end.

Program Sasha Masha;

var

S,M:Integer;

begin

write('введите возраст Саши');

readln(S);

writeln('введите возраст Маши');

readln(M);

if S>M then

writeln("Саша старше Маши")

else

writeln("Маша старше Саши");

end;

end.