Регистрация
Alexander0prokof
07.07.2020 11:03
Информатика
Есть ответ 👍

Дано целое число. найти наименьшее четное из набора. то есть если число 123, то ответом будет 1. язык паскаль

125
285
Посмотреть ответы 2

Ответы на вопрос:

pavdora073539
pavdora073539
4,5(72 оценок)

var min,num: int64; begin  writeln('vvedite chislo');   readln(num);   min: =num mod 10;   while(num> 0) do begin      if(min> (num mod 10)) then min: =num mod 10;       num: =num div 10;   end;   writeln(min);   readln;   end.

Валерыч2005
Валерыч2005
4,4(33 оценок)
13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32

Популярно: Информатика