5) в последовательности из n вещественных чисел определить наибольший элемент последовательности
3)вычислить сумму нечетных чисел , не превышающих n. При вводе с клавиатуры числа 5, результат= 1+3+5=9

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017// Внимание! Если программа не работает, обновите версию!5)begin  Writeln('Max=',ReadSeqReal('Введите числа:',ReadInteger('n=')).Max)end.Примерn= 8Введите числа: 4.12 5 1.48 -6 0 7.3 5.12 0.005Max=7.33)begin  Writeln('Sum = ',Range(1,ReadInteger('n ='),2).Sum)end.Примерn = 5Sum = 9