Учеба и наука
Решено
Помогите решить задачу на паскале - вопрос №371155
На любом известном алгоритмическом языкенапишите алгоритм вычесления произведения элементов массива B(m) который больше 6 .
решение обязательно на паскале. Заранее спасибо .
Дополнение автора от сентябрь 23, 2012 г., 16:03:49
Можите обяснить зачем Р
Clad сентябрь 21, 2012 г.
-
Всего ответов: 1
-
program pr1;
const m=10;
var a:array[1..m] of integer;
i:integer;
p:longint;
begin
writeln('vvedite massiv');
for i:=1 to m do
readln(a[i]);
p:=1;
for i:=1 to m do
if a[i]>=6 then p:=p*a[i];
writeln('p=',p);
readln
end.
Буду благодарна, если отметите
Лучший ответ по мнению автора
Похожие вопросы
Решено
В некоторой стране автомобильный номер длиной 6 символов составляется из заглавных букв
сентябрь 19, 2013 г.
Учеба и наука