Напишите самый простой вариант, без массивов с цикла! (первый год изучения паскаля) напишите программу, которая в последовательности целых чисел определяет разность максимального и минимального чисел. программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность) . количество чисел не превышает 1000. введённые числа по модулю не превышают 30 000. программа должна вывести одно число: разность максимального и минимального чисел.

154

352

Посмотреть ответы 2

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

freemvount

Информатика

4,4(92 оценок)

program juliavanina; uses crt; var r,min,max: real; k: integer; begin writeln('*** alphaues is ***'); writeln('*** ok ***'); min: =0; max: =0; k: =0; r: =1; writeln('введите ненулевое число, не превышающее 30000 по модулю'); writeln('(или введите 0 для конца последовательности) '); while (r< > 0) and (k< 1000) do begin write('ввод: '); readln (r); if abs(r)< 30000 then begin if min> r then min: =r; if max< r then max: =r; k: =k+1; end else begin writeln ('вы ввели слишком большое по модулю число'); writeln ('это число не будет учтено'); end; end; writeln(); writeln('всего введено ',k-1,' чисел'); writeln('разность min и max составляет ',max-min); end.

проверено - работает на паскаль авс

pomogi31

Информатика

4,6(54 оценок)

1) Общем случае система команд процессора включает в себя следующие четыре основные группы команд:

· команды пересылки данных;

· арифметические команды;

· логические команды;

· команды переходов.

2) Через ОС

Что такое программа?

Компью́терная програ́мма — 1) комбинация компьютерных инструкций и данных, позволяющая аппаратному обеспечению вычислительной системы выполнять вычисления или функции управления.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.