Решите в программе паскаль
Напишите программу, в которой осуществляется ввод целых чисел (ввод
осуществляется до тех пор, пока не будет введён ноль) и определение
минимального (наименьшего) из введённых чисел.
Milania0011
2
19.04.2020 23:47
1
Другие вопросы по теме Информатика
MissKaprizz99
28.07.2019 17:20
nyatteloiv
19.07.2019 10:00
ndan1k
19.07.2019 10:00
gamergrisha1
19.07.2019 07:53
Veronichkadyi
19.07.2019 10:10
Рита496
16.05.2020 13:57
Lena111115
16.05.2020 13:57
яЭльф
15.09.2019 16:00
Популярные вопросы
- Напишите сочинение на тему что даёт нам школа на . заранее огромное ))...
2 - Заполните таблицу, поставив вместо звездочек соответствующию цифру: 63*,37*,49*...
2 - Капитанская дочка . 7 класс. какое отношение пугачёва к гринёву?...
2 - От каких величин зависит модуль линейной скорости при равномерном движении...
2 - Приложения с деепричастным оборотом со словами благородный, великодушный,...
3 - Давай пойдем в театр.где работает твоя тётя.она работает в магазине овощей.мне...
3 - Скинь текст сказок лиса заяц и петух и ещё кот и лиса...
2 - Ослово, милое ,простое ! тебя в стихах я восхвалю! словцо ты ,прямое , тебя...
2 - Какая энергия является первопричиной почти всех процессов на земле? геотермальная...
2 - Люмпены и маргиналы сходства какие у...
2
var a,min: integer;
begin
write('Введите число: ');
readln(a);
min:=a;
if (a<>0) then
repeat
write('Введите число: ');
readln(a);
if (a<min) and (a<>0) then min:=a;
until a=0;
writeln('Минимальное введенное число: ',min);
end.