Регистрация
minipersik02
21.03.2023 13:42
Информатика
Есть ответ 👍

Заполнить массив из 10 элементов случайными числами в интервале от [-10..10] и найти в нем максимальный и минимальный элементы и их номера

233
433
Посмотреть ответы 3

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

glupiychelovek
glupiychelovek
4,5(30 оценок)
Pascalabc.net 3.4.2, сборка 1864 от 11.11.2018 внимание! если программа не работает, обновите версию!

begin

  var a : = arrrandom(10, -10, 10);

  a.println;

  var i : = a.indexmin;

  writeln('min a[', i + 1, ']=', a[i]);

  i : = a.indexmax;

  writeln('max a[', i + 1, ']=', a[i])

end.

-6 -10 9 0 -9 2 10 -7 1 3 min a[2]=-10 max a[7]=10
Tusurgaliev11
Tusurgaliev11
4,4(48 оценок)

javascript: var массив = [], макс_зн, макс_ном, мин_зн, мин_ном; for (let сч = 0; сч < 10; сч++) массив.push((function (от, до) { return math.round(от - 0.5 + math.random() * (до - от + 1)); }, 10)); массив.foreach(function (зн, ном) { if (ном == 0) { макс_зн = зн; макс_ном = 0; мин_зн = зн; мин_ном = 0; } else { if (зн > макс_зн) { макс_зн = зн; макс_ном = ном; } else if (зн < мин_зн) { мин_зн = зн; мин_ном = ном; } } }); alert(макс_зн + " (" + макс_ном + "); " + мин_зн + " (" + мин_ном + ")");

svetlana50036
svetlana50036
4,4(43 оценок)
Var s: string; i: integer; begin readln(s); s: =' '+s; for i: =1 to length(s) do if s[i] = ' ' then write(s[i+1]); end.

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