tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Задать массив из 10 элементов
Задать массив из 10 элементов случайным набором из отрезка [5; 20] и вывести его на экран. найти наименьший элемент и вывести его номер.
Mrrezed
2 02.06.2019 18:40
0
Ответы
veronikasizonov
03.07.2020 12:15
Var
a : array [1..10] of integer;
i, m : integer;
begin
randomize;
for i := 1 to 10 do
begin
a[i] := random (16) + 5;
write (a[i], ' ');
end;
writeln;
m := 1;
for i := 2 to 10 do
if (a[i] < a[m]) then m := i;
write (m);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
husanov18p06h9l
03.05.2020 18:49
[ ];См.фото. расчет затрат...
instajohap091g2
03.05.2020 18:47
Программирование Python. Дан список, состоящий из n элементов. Выполните обратный порядок первой половины списка и выведите новый список на экран....
ludcolobanova
03.05.2020 18:47
Скільки етапів виділяють під час створення комп ютерних презентацій?...
karina24264
01.09.2019 15:10
Втаблице ves хранятся данные о весе в килограммах по группе учищихся спортивной школы (ves [1] - вес первого учащегося , ves [2] - вес второго учащегося и т.д). определите,...
Yorfound
01.09.2019 15:10
(33 ) перепишите программу на паскале, исправив ошибки: program massiv; var a: array(-10..10) of integer; begin for i: =1 to 20 do read(a[i]); for i: =1 to 20 do a[i]:...
Vova77723
17.01.2020 04:19
Найдите матрицы смежности и инцидентности графов...
artemdolgin69
19.10.2020 14:29
A doon concile com 6. Даны команды блока Управление . Найди соответствие,DAC СВEАВDE Бесконечныйцикл1 из 1Цикл епараметром0 из 1Циклеусловием0 из 1Полное0 из 1ветвлениеНеполное0...
sashkaaaxo
19.10.2020 14:29
Здравствуйте доделать задание, Информатика рабочая тетрадь задание номер 3 на стр 29...
ЯговорюПриветАндрей
19.05.2020 16:16
Банк пропонує вкладнику два види депозитів: 15% прибутку за рік і 7% прибутку за півроку. В обох випадках прибуток додається до вкладу. Створіть проєкт для порівняння прибутку...
НатальяНОВ
19.05.2020 16:15
1. К какому жанру компьютерных игр относится действия: перемещение в использование инструментов и техники? ( ) А) игры контроля В) игры действия C) Игры обобщения D) игры...
Популярные вопросы
Complete the sentences with the correct from of rhe verb in brackets...
1
Ивс этих словосочетаниях, 1. снежный свет; 2. стекловидные глаза; 3.каменно...
1
Для вас взросление сложный период? есть причины? может ссоры,недопонимания...
2
Заранее . спишите, вставляя пропущенные буквы и обозначая обстоятельства....
3
Опишите одно из понравившихся вам произведений изобразительного искусства...
3
Напишите уравнение окружности с центром в точке с(4; -3), кото- рая...
2
Втрёх одинаковых тетрядах54 листа бумаги сколько таких тетрадей получится...
1
Составить два предложения с числительными, сделать морфологический разбор...
1
Продумайте и проделайте опыт доказывающий существование архимедовой...
2
Одна из старых мер вера-фунт-равняется прмерно 454 г. заполни пропуски...
3
a : array [1..10] of integer;
i, m : integer;
begin
randomize;
for i := 1 to 10 do
begin
a[i] := random (16) + 5;
write (a[i], ' ');
end;
writeln;
m := 1;
for i := 2 to 10 do
if (a[i] < a[m]) then m := i;
write (m);
end.