Составьте алгоритм, по которому на компьютере будет происходить следующее: в переменную 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.