Question

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

Answer 1

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.

Answer 2

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

Answer 3

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

Answer 4

ага