1. Информатика
  2. Напишите программы на pascalabc.net

Напишите программы на pascalabc.net
№4:
напишите программу, которая в последовательности натуральных чисел определяет максимальное значение чисел, которые меньше 200. программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность). количество чисел не превышает 100. введённые числа не превышают 300. программа должна вывести одно число: максимальное из чисел, которые меньше 200.
например: 213 51 212 48 34 112 0 ==> 112

Oliawait Oliawait    3   29.11.2019 16:23    0

Ответы
uraalekseev1234 uraalekseev1234  17.08.2020 13:54

begin

 ReadSeqIntegerWhile(p -> p <> 0)

   .Where(p -> p < 200)

   .Max

   .Println

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
milka294 milka294  06.04.2021 22:19
Вычислите Периметр и Площадь прямоугольно треугольника по заданным длинам 2-х катетов (по теореме Пифагора) В Паскале*...
Шиппер111 Шиппер111  06.04.2021 22:17
работаем в программе Пайтон Например a=float(input( Перше число а= )) b=float(input( Друге число b= )) c=float(input( Третє число c= )) if a x=a b=x if b x=b b=c c=x if a x=a a=b...
sergey1234567890f sergey1234567890f  06.04.2021 22:16
1. Запишите, чем отличаются программы Блокнот и WordPad. 2. Найдите в Справочной системе и запишите ответ на вопрос, что делает дефрагментация диска? 3. Рассчитайте в программе...
ilyawolk316 ilyawolk316  29.09.2019 11:20
Для кодирования текста использовалась кодовая таблица символов, содержащая 16662 символов. каждый символ в ней закодирован минимально возможным и одинаковым количеством байт. с...
Helпаните Helпаните  29.09.2019 11:20
С++ по номеру дня недели (целое число от 1 до 7) определить его название. и если сможете,напишите блок-...
polinaa6 polinaa6  29.09.2019 11:20
Переведите число 78 из десятичной в двоичную, восьмиричную и в шестнадцатиричную, с разбором!...
Dariya160408589865 Dariya160408589865  29.09.2019 11:20
Два сообщения содержат одинаковое количество символов. количество информации в первом тексте в 1,5 раза больше, чем во втором. сколько символов содержат алфавит, с которых записаны...
InnaGlazova InnaGlazova  25.11.2021 09:29
1)Дан вектор К состоящий из М целых чисел (0 2) Дан одномерный целочисленный массив А состоящий из N элементов. N заданное натуральное число. Если элементы массива А образуют строго...
ijulijuli23 ijulijuli23  04.10.2019 16:00
Статья, набранная на компьютере, содержит 32 страницы, на каждой странице 40 строк, в каждой строке 64 символа. определите размер статьи в кодировке кои-8, в которой каждый символ...
ZSkeletZ ZSkeletZ  04.10.2019 16:00
Даны высказывания: а = {10-3=7}, b = {10-7=3}. определить истинность высказываний: а, в, а& в, а̅, в̅, аvв, а→в, а↔в....

Популярные вопросы