Написать программы: 1. на вход поступает последовательность натуральных чисел, заканчивающаяся числом 0 (0 - признак окончания последовательности). все числа не превышают значение 65535. программа должна вывести б) максимальное число из этой последовательности в) минимальное число этой последовательности г) количество чисел, последняя цифра которых - 7
Xomawq
3
02.10.2019 15:40
0
Другие вопросы по теме Информатика
DashaPol09
01.04.2019 21:10
Mazhor1
01.04.2019 21:20
Pincode11
02.09.2019 13:50
DarkGay
08.03.2019 03:10
приветки1
02.03.2019 19:20
Stikki
02.03.2019 19:20
otepovaaazan
02.03.2019 19:20
tatiana260378
02.03.2019 19:10
Dvoecnik
21.01.2022 12:14
Популярные вопросы
- Однокоренные слова к слову цветок...
3 - Ширина прямоугольного параллелепипеда 15 см, длина в 3 р больше, а высота...
3 - Электрон влетает в однородное электрическое поле в направлении линий...
2 - Напишите сказку где 3-5 предложений....
1 - Нужно сочинить сказку о какой то вещи например о портфеле, тапочках,...
3 - Вравнобедренном треугольнике внешний угол при вершине, противолежащей...
1 - Не большой рассказ о любой профессии, на ....
3 - 30×10-(76+83)=141. 6×(36-28)-19=18,25...
3 - Почему без деятельности бактерий жизнь на земле была бы невозможна?...
1 - Если две прямые на плоскости перпендикулярны третей прямой,то они параллельны...
1
begin
var (max, min, k) := (-100000, 100000, 0);
ReadSeqIntegerWhile(t -> t <> 0)
.Foreach(t ->
begin
if t > max then max := t;
if t < min then min := t;
if t mod 10 = 7 then Inc(k)
end);
Writeln('min=', min, ', max=', max, ', искомое кол-во: ', k)
end.