Напишите программу пожалуйста в паскале произведение элементов массива, расположенных между максимальным и минимальным элементами;
Напишите программу пожалуйста в паскале
произведение
элементов массива, расположенных между максимальным и минимальным элементами;
Гость
Ответ(ы) на вопрос:
Гостьconst n=10;
var min,max,i:integer; p:real; a:array[1..n] of real;
begin
p:=1; min:=1; max:=1;
for i:=1 to n do read(a[i]);
for i:=1 to n do if a[i]>a[max] then max:=i else if a[i]
Не нашли ответ?
Похожие вопросы