ТутРешу.Ру

Вывести на экран элементы, расположеные перед первым минимальным

Задание:

Вывести на экран элементы, расположеные перед первым минимальным. Массив, паскаль

Решение:

Uses crt; var n,i,min,ind: integer; a: array[1… 100] of integer; beginwriteln ('Input "n" and elements of array: '); read (n); read (a[1]); min: =a[1]; ind: =1; for i: =2 to n dobeginread (a[i]); if a[i]



Знаете другой ответ?

Отправить свой ответ