tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Записать программу: дан массив
Записать программу: дан массив а(10), заполненный датчиком случайных чисел. найти сумму минимального и максимального элементов массива
olesy1945
1 22.06.2019 02:00
12
Ответы
alexasnowbell
02.10.2020 07:53
Vara: array [1..10] of integer;
i,max,min:integer;
begin
min:=10; max:=0;
randomize;
for i:=1 to 10 do
a[i]:=random (10);
for i:=1 to 10 do
if a[i]>max then max:=a[i]
else if a[i]< min then min:=a[i];
i:=max+min;
writeln(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
korol095
25.11.2021 08:40
Символом F обозначено одно из указанных ниже логических выражений от трёх аргументов: X, Y, Z. На рисунке дан фрагмент таблицы истинности выражения F. Какое выражение...
Mihan4ik
02.08.2020 17:07
1. Нарисуйте блок-схему следующего алгоритма: 1) Пользователь вводит размер целочисленного массива; 2) Программа выделяет память под данный массив; 3) В цикле инициализируются...
benjulia
03.08.2020 16:50
что значит(сетевой адаптер не имеет допустимых параметров настройки IP)? И что делать...
karapetyanhovn1
27.08.2019 23:20
Напишите программу формирования и вывода массива размером 6x3, каждые три последовательных элемента в строке которого составлены по следующему правилу: 1-й — равен...
helppls7
27.08.2019 23:20
Как интернет делает общение на расстоянии легче (проще)?...
akulkaeva78
23.04.2020 01:30
Бітова частота звукового файлу дорівнює 256 кбіт/с обсяг файла становить 5,69 мб. Визначте тривалість аудіо, вказавши кількість повних хвилин...
radovdima
23.04.2020 01:30
Запиши число 1CD16 в десятичной системе счисления!...
natalia04062001
22.04.2020 18:51
До якої алгоритмічної структури належить здійснення дзвінка з мобільного телефону, якщо є кошти на рахунку чи нема?...
Vandannc
22.04.2020 18:51
Установите порядок действий при регистрации почтового ящика. Укажите порядок следования всех 5 вариантов ответа (информатика)...
lhe
20.05.2020 16:31
Для какого из приведённых имён истинно высказывание: НЕ (Первая буква согласная) И НЕ (Последняя буква гласная)? Выберите один ответ: Ольга Валентина Ян Михаил...
Популярные вопросы
Творчество cервантеса приходится на эпоху 1.возрождения 2.средневековья...
3
Характеристика реки лена. кратко. (длина, устье, исток, питание,...
3
Найдите размер заема , если интресс 448€ ,а процентная ставка...
1
Представьте в виде многочлена стандартного вида (3x-2)^3....
1
Какое средство выразительности использовано в предложении 45....
3
1.кто герой произведения мужичок с ноготок ? 2.имя героини поэмы...
1
С! а)21: 8 3/4-9 9/10: 6 3/5 б)4 4/5: 18+14/15*5/8 в)4 5/8+(3...
2
Выполните умножение: 5) (a²-b²)(a²+b²)= 7) (5x²-3y)(5x²+3y)= 9)...
1
Зніміть гумове кільце (нитку) з пальця. що ви помітили? чому зникає...
1
Если бы вам представилась возможность снять фильм об одной из...
2
i,max,min:integer;
begin
min:=10; max:=0;
randomize;
for i:=1 to 10 do
a[i]:=random (10);
for i:=1 to 10 do
if a[i]>max then max:=a[i]
else if a[i]< min then min:=a[i];
i:=max+min;
writeln(i);
end.