Ветвления на Паскале. Программирование
диалога с компьютером
Помогите!
Program v1;
uses crt;
var a,b:integer;
begin
writeln(Введите возраст Саши: );
readln(a);
writeln(Введите возраст Маши: );
readln(b);
if a>b then write(Саша старше Маши );
if aif a=b then write(Маша и Саша - ровесники);
end.
Оцени ответ
