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