Напишете программу на языке Pascal, которая в массиве из 23 элементов заменяет последний элемент минимальным. Массив должен заполняться случайными значениями в интервале от 0 до 120
Напишете программу на языке Pascal, которая в массиве из 23 элементов заменяет последний элемент минимальным. Массив должен заполняться случайными значениями в интервале от 0 до 120
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1374 от 10.01.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(23,0,120); a.Println;
a[22]:=a.Min; a.Println
end.
Пример
26 32 46 4 64 40 17 60 35 1 34 39 113 61 26 53 92 89 11 10 98 90 34
26 32 46 4 64 40 17 60 35 1 34 39 113 61 26 53 92 89 11 10 98 90 1
Не нашли ответ?
Похожие вопросы