PASCALABC.NET!!!85 баллов очень нужна помощь!нужно написать 2 программы на выбор на языке паскаль(желательнл одну из 2 , и одну

Question

4 года назад

10

PASCALABC.NET!!!85 баллов очень нужна помощь!нужно написать 2 программы на выбор на языке паскаль(желательнл одну из 2 , и одну

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

Знания

Информатика

1 ответ:

Pokarashka [45] · Answer 1 · 2020-04-24T04:11:06+03:00

<h3>PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>

begin

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

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

end.

<h2>Введите 5 чисел через пробел: 12 35 14 8 15</h2><h2>Самый старый 35 самый молодой 8</h2>

begin

1.To(ReadInteger).Sum.Println

end.