Составьте программку, которая наполняет одномерный целочисленный массив из 100 частей

Составьте программку, которая наполняет одномерный целочисленный массив из 100 частей случайным образом в спектре от 1 до 40 , выводит заполненный массив на экран, а потом находит минимальный элемент и номер ячейки, которые после нахождения выводятся на экран

Задать свой вопрос
1 ответ
// PascalABC.NET 3.2, сборка 1389 от 01.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
writeln('начальный массив:');
var a:=ArrRandom(100,1,40).Println();
var k:=1;
foreach var item in a do if item=a.Min then break else inc(k);
writeln('минимальный элемент: a[',k,']=',a.Min());
end.
Надежда Жолнер
А можно как то более наименее стандартные функция паскаля, пожалуйста (с внедрением array? const
Jelvira Bassaraba
Можно к этому блок схему?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт