Question

PASCALABC.NET!!!85 баллов
очень нужна помощь!нужно написать 2 программы на выбор на языке паскаль(желательнл одну из 2 , и одну из 3,но непринцпиально):
2.18 Вводится возраст пяти человек.Необходимо найти самого старого и молодого
2.17 Найти количество прожитых дней(даты рождения и текущая дата вводятся с клавиатуры)
3.2С клавиатуры вводится натуральное число n.Вычислите сумму:S=1+2+...+n
3.1С клавиатуры вводится натуральное число N.За ним последовательно вводятся данные о росте N учащихся класса.Определите средний рост учащихся всего класса

Answer 1

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 var v := ReadArrInteger('Введите 5 чисел через пробел:', 5);

 Println('Самый старый', v.Max, 'самый молодой', v.Min)

end.

Введите 5 чисел через пробел: 12 35 14 8 15

Самый старый 35 самый молодой 8

begin

 1.To(ReadInteger).Sum.Println

end.

10

55