Задание 6 Вариант 3 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
Решение #1
![Изображение 6. Напишите программу. Дан целочисленный массив С[1..1ОО]. Подсчитайте разность значений наибольшего и наименьшего элементов данного массива.Наибольший элемент...](/reshebniki/informatika/11/WBbosova/images1/sam4/3/6.png "Изображение ответа 6. Напишите программу. Дан целочисленный массив С[1..1ОО]. Подсчитайте разность значений наибольшего и наименьшего элементов данного массива.Наибольший элемент...")
Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
6. Напишите программу. Дан целочисленный массив С[1..1ОО]. Подсчитайте разность значений наибольшего и наименьшего элементов данного массива.
Наибольший элемент равен:.....
Наименьший элемент равен:.....
Разность наибольшего и наименьшего элементов равна:.....
program s4_v3_6;
const
n = 100;
var
c: array[1..n] of integer;
i, max, min: integer;
begin
writeln('ввод массива');
randomize;
for i := 1 to n do
c[i] := random(100);
max := c[1]; min := c[1];
for i := 1 to n do
begin
if c[i] > max then max := c[i];
if c[i] < min then min := c[i]
end;
writeln('max=', max, ' min=', min, ' max-min=', max - min)
end.
Наибольший элемент равен: 99
Наименьший элемент равен: 0
Разница наибольшего и наименьшего элемента равна: 99
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением
