определить наименьшее из чисел введённых с клавиатуры количество ...
определить наименьшее из чисел введённых с клавиатуры количество чисел не известно, а их запрос с клавиатуры прекращается если введено число 0 (pascal)
Есть ответ
12.12.2022
382
Ответ
program raf105;
var a, min: integer;
begin
writeln('Вводите числа по очереди');
writeln('Чтобы закончить введите 0');
min:= 10000;
readln(a);
while a0 do
begin
if a
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
12.12.2022
