1. Информатика
  2. Напишите программу, которая

Напишите программу, которая в последовательности натуральных чисел определяет наибольшее нечётное трехзначное число. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется нечетное
трехзначное число. Ко Количество чисел не превышает 1000. Введенные числа не превышают 30 000. Программа должна вывести одно число - наибольшее нечётное трехзначное число после-
довательности.
Пример работы программы:
Входные данные
4 2345 583 857 954
Выходные данные
857

savannah1 savannah1    3   20.05.2020 07:29    8

Ответы
69699696 69699696  13.08.2020 07:50

program z1;

var m,n,i,a: integer;

begin

writeln('Введите количество чисел в последовательности');

write ('n = ');

readln (n);

m:=101;

for i := 1 to n do

begin

write ('Введите число: ');

readln (a);

if (a>=100) and (a<=999) and (a mod 2 <> 0) and (a>m) then m:=a

end;

writeln ('Наибольшее нечётное трехзначное число ',m)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
PlayGirl1999 PlayGirl1999  05.05.2020 09:57
3. Какое значение будет иметь переменная d, после выполнения операторов? a) a:=3; b:=2; if a b Then d:=a Else d:=b;b) f:=2; k:=5; if f k Then v:=f Else v:=k;​...
Ilyakuhs228 Ilyakuhs228  05.05.2020 09:57
Гиперсілтемеге көмекші сөз қою ретін анықтаңыз. Көмекші сөз түймесін шерту Қою - Гиперсілтеме командасын орындау. Көмекші сөз мәтінін енгізу...
brekisbrekis brekisbrekis  14.06.2019 11:10
Дан линейный массив. нужно найти сумму минимального и максимального элемента массива, а также кол-во отрицательных элементов, стоящих на чётных местах, и вывести массив вычеркнув...
nikitanosach2901 nikitanosach2901  20.03.2019 12:50
Созданный на компьютере текст занимает 6 полных страниц.на каждой странице размещается 30 строк по 70 символов в строке.какой объем оперативной памяти (в байтах) займет этот текст?...
Шнуров Шнуров  20.03.2019 11:59
На x рублей купили y компьютеров.сколько компьютеров можно купить на z рублей. для pascal ррешите умаляю...
дашуля296 дашуля296  20.03.2019 12:00
Решите в кумир x=b*a-корень из a^3+b^2*(-a)/b-3 ^-степень , /—деление само решение в одну строку,желательно прислать фото...
Fixa Fixa  20.03.2019 12:03
Сколько компьютеров можно разместить в сети если в кодирование компьютера использовать 3, 4, 8 байт...
dilaratristarimir dilaratristarimir  12.06.2019 16:30
Внекоторой стране автомобильный номер длиной 5 символов составляют из заглавных букв (задействовано 28 различных букв) и десятичных цифр в любом порядке. каждый такой номер в...
unknown2015 unknown2015  12.06.2019 16:30
Два туристских лагеря, расположенных по разные стороны реки, условились передавать друг другу сообщения при цветных фонариков красного и зеленого цвета, зажигая или гася их на...
SofaCat1231 SofaCat1231  12.06.2019 16:30
Дано число. найти среднее арифметическое его цифр...

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