Вопрос по информатике:
Дано целое число. Найти наименьшее четное из набора. То есть если число 123, то ответом будет 1. Язык паскаль
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 06.03.2018 07:22
- Информатика
- remove_red_eye 2606
- thumb_up 75
Ответы и объяснения 1
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.
- 07.03.2018 10:07
- thumb_up 35
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.