Плесс. на языке паскаля. напишите программу,которая в последовательности натуральных чисел определяет минимальное,оканчивающееся на 2. программа получает числа. признак окончания ввода 0. количество чисел не превышает 1000. введенные числа не превышают 30000. программа должна вывести одно число - минимальное,оканчивающееся на 2,если таких нет,вывести на экран об этом сообщение.
kjhfdklffsjsw
3
25.08.2019 07:20
0
Другие вопросы по теме Информатика
roma260902
15.12.2021 23:44
Дуся003
15.12.2021 23:53
Дурачкао
08.07.2019 16:30
Julli0Kub
08.07.2019 16:30
odariya
08.07.2019 16:30
Alexgk13
16.01.2020 02:32
xDVadiKSlivE
16.01.2020 01:24
KimTaeHyung3012
16.01.2020 00:54
Популярные вопросы
- При напряжении на концах проводника 2 В сила тока в проводнике - 0,5 А. Какой будет...
2 - Какое количество энергии выделит вода массой 2 кг при охлаждении от 100°С до 0°С?...
3 - Нарисуйте схему цепи карманного фонаря (см. рис. 51) и назовите части этой цепи....
2 - Сила тока в спирали электрической лампы 0,7 А, сопротивление лампы 310 Ом. Определите...
1 - Выразите в омах значение следующих сопротивлений. 100 мОм; 0,7 кОм; 20 МОм...
3 - На рисунке 50 дана схема соединения лампы и двух переключателей. Рассмотрите схему...
2 - Как, пользуясь им, нанести шкалу на другой, еще не проградуированный амперметр?...
1 - Длина одного провода 20 см, другого -1,6 м. Площадь сечения и материал одинаковы....
2 - Рассчитайте сопротивления следующих проводников, изготовленных: а) из алюминиевой...
2 - Определите по графику (см. рис. 69) сопротивление данного проводника...
3
A,m:integer;
Begin
m:=32767;
Repeat
Read(A);
if (A mod 10 = 2)and(A < m) then m:=A;
Until A=0;
if m mod 2 = 0 then WriteLn(m)
else WriteLn('Чисел, оканчивающихся двойкой нет.')
End.