1. Информатика
  2. Вводится последовательность

Вводится последовательность из натуральных чисел. найти минимальный элемент среди нечётных. через if pascal

anastasiastrel2 anastasiastrel2    1   09.12.2019 11:30    1

Ответы
Misterriko70 Misterriko70  03.09.2020 10:40

var a,min: integer;

begin

readln(a);

min:=a;

while(a<>0) do begin

if(a<min) and (a mod 2<>0) then min:=a;

readln(a);

end;

write(min);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
danisdigger danisdigger  09.03.2019 07:30
Пятеро одноклассников: аня, саша, лена, вася и миша стали победителями олимпиад школьников по , , информатике, и . известно, что: 1) победитель олимпиады по информатике учит аню...
Leshik1997 Leshik1997  09.03.2019 07:30
Выполнить действия: 1) 425aa911*3611 2) 576a4b12-a9b8a12...
Tashernaut Tashernaut  09.03.2019 07:30
Перевести из указанной системы счисления в 10-ую систему счисления число: 728 (9-я система счисления)...
милана05051 милана05051  09.03.2019 07:30
Перевести из 2-ой системы счисления в 4-ю и 16-ую системы счисления 111001001111001111...
oaooks oaooks  25.05.2019 05:10
Сколько страниц текста (60 строк по 55 символов) можно записать на дискету емкостью 720 кб?...
314159026 314159026  25.05.2019 05:10
Информатика 9 класс вывести на экран в строчку числа от 1 до 20....
Yourname756 Yourname756  06.10.2019 07:20
Информационный объем сообщения binary digit равен: (один ответ)...
VTKOF VTKOF  06.10.2019 07:20
Паскаль! procedure yep(b,n: integer); beginif n 0 then exit; yep(n div b); if(n mod b) 10 thenwrite(n mod b); case(n mod b) of 10: write ( a ); 11: write ( b ); 12: write ( c );...
nastushakh20001 nastushakh20001  22.05.2019 10:20
Камень брошен горизонтально со скоростью 30 м/с . чему равна его скорость спустя 4 с? найдите изменение координат камня по обеим осям за это время....
assel00031 assel00031  22.05.2019 10:20
Тело массой m1 = 2 кг движется со скоростью v1 = 3 м/с и нагоняет тело массой m2 = 8кг, движущееся со скоростью v2 = 1 м/с. считая удар центральным, найти скорости u1 и u2 тел после...

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