
Вопрос задан 18.02.2019 в 03:23.
Предмет Информатика.
Спрашивает Назаров Тимофей.
Напишите программу, которая вводит с клавиатуры числа до тех пор, пока не будет введено число 0. В
конце работы программы на экран выводится минимальное и максимальное из введенных чисел (не считая 0)

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

Отвечает Писарева Юлиана.
{с клавиатуры вводится число a, до тех пор, пока не будет введен 0. Начальное введенное a записывается в min и max, чтобы потом в цикле было с чем сравнивать}
var
min,max,a:real;
begin
readln(a);
min:=a;max:=a;
while a<>0 do
begin
readln(a);
if a>max then
max:=a;
if a<min then
min:=a;
end;
writeln('min: ',min,' max: ',max);
end.
var
min,max,a:real;
begin
readln(a);
min:=a;max:=a;
while a<>0 do
begin
readln(a);
if a>max then
max:=a;
if a<min then
min:=a;
end;
writeln('min: ',min,' max: ',max);
end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Программа на Python:
```python numbers = [] while True: num = int(input("Введите число: ")) if num == 0: break numbers.append(num)
if len(numbers) > 0: min_num = min(numbers) max_num = max(numbers) print(f"Минимальное число: {min_num}") print(f"Максимальное число: {max_num}") else: print("Вы не ввели ни одного числа, кроме 0.") ```
Эта программа создает пустой список `numbers` и в цикле запрашивает у пользователя ввод чисел. Если пользователь вводит 0, цикл прерывается. Затем программа находит минимальное и максимальное число в списке `numbers` (не включая 0) с помощью функций `min()` и `max()`. Если список `numbers` пустой, программа выведет сообщение о том, что кроме 0 других чисел не было введено.


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