Помогите с информатикой плиз))
Paskall:
var a:array[1..5[ of integer;
i, min:integer;
begin
writeln(Введите элементы массива (5 целых чисел) в одной строке и нажмите
for i:=1 to 5 do
read(a[i]);
min:=a[1];
for i:=2 to 5 do
if(a[i]
writeln(Минимальный элемент массива: , min);
end.
Оцени ответ
