Информатика, опубликовано 2018-08-22 23:48:02 by Гость
Задача 9 класс. Массивы. Найти произведение элементов соседних с минимальным(5 элементов вводить с клавиатуры)
Ответ оставил Гость
Program enot;
Var a: array [1..5] of integer;
i,min,c:integer;
begin
for i:= 1 to 5 do read (a[i]);min:=a[1];
for i:= 2 to 5 do
if a[i]
min:= a[i];
c:=a[i-1]*a[i+1];
end
else c:=0;
end;
write(c);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на