
Вопрос задан 29.06.2023 в 11:46.
Предмет Другие предметы.
Спрашивает Антипова Юлия.
Напишите программу, в которой с экрана вводятся целые числа до тех пор, пока не будет введен ноль.
Из введенных чисел найти минимальное положительное и его номер. Использовать массивы нельзя.

Ответы на вопрос

Отвечает Шестакова Анна.
Ответ:
var
max,a : integer;
begin
readln(a);
max := a;
repeat
readln(a);
if (a > max) and (a <> 0) then
max := a;
until a = 0;
writeln(max);
readln;
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Вы можете решить эту задачу, используя циклы и переменные. Вот пример программы на Python:
python# Инициализируем переменные для минимального положительного числа и его номера
min_positive = None
min_positive_index = None
# Счетчик номера введенных чисел
index = 0
while True:
# Вводим число с клавиатуры
num = int(input("Введите целое число (для завершения введите 0): "))
# Увеличиваем номер введенного числа
index += 1
# Проверяем, был ли введен ноль для завершения программы
if num == 0:
break
# Проверяем, является ли число положительным
if num > 0:
# Если min_positive еще не было установлено, или текущее число меньше минимального положительного,
# то обновляем min_positive и min_positive_index
if min_positive is None or num < min_positive:
min_positive = num
min_positive_index = index
if min_positive is not None:
print(f"Минимальное положительное число: {min_positive}")
print(f"Номер минимального положительного числа: {min_positive_index}")
else:
print("Положительные числа не были введены.")
Этот код позволяет вводить целые числа с клавиатуры до тех пор, пока не будет введен ноль. Затем он находит минимальное положительное число и его номер и выводит результат.


Похожие вопросы
Топ вопросов за вчера в категории Другие предметы
Последние заданные вопросы в категории Другие предметы
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili