Информатика!!!
1.Напишите программу нахождение максимального среди трёх чисел.
2.Вводятся оценки за контрольные работы по физике и математике,выведите на экран молодец,если их сумма равна или более 9,иначе подтянись.

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018Внимание! Если программа не работает, обновите версию!№1begin  var (a,b,c):=ReadReal3('Введите три числа через пробел:');  Writeln('Максимальное число ',Max(a,Max(b,c)))end.№2begin  var (a,b):=ReadInteger2('Введите две оценки через пробел:');  if a+b>=9 then Writeln('Молодец!')  else Writeln('Подтянись!')end.