Помогите пожалуйста по информатике, желательно все подробно. ну и правильно конечно) 1)...

Question

Помогите пожалуйста по информатике, желательно все подробно. ну и правильно конечно)
1) Дан массив из 5 элементов. Найти min и max элементов и их произведение.

Comments

произведение мин и мах ?

---

да

Answer 1

Программа на скрине! Надеюсь помог!

Comments

динамически массив?

---

ага

Answer 2

Begin 
var a:=ArrRandom(5,-20,20); 
write( 'Массив: '); 
a.Println; 
write( 'Максимум: '); 
writeln(a.Max); 
write( 'Минимум: '); 
writeln(a.Min); 
write( 'Произведение: '); 
writeln(a.Max*a.Min);
end.