Главная arrow icon Вопросы arrow icon Учеба и наука arrow icon Информатика arrow icon Помогите решить задачу на паскале

Помогите решить задачу на паскале - вопрос №371155

На любом известном алгоритмическом языкенапишите алгоритм вычесления произведения элементов массива B(m) который больше 6 .

решение обязательно на паскале. Заранее спасибо .



Дополнение автора от 23.09.12 17:03:49

Можите обяснить зачем Р

Clad
21.09.12
Учеба и наука / Информатика
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. 

Буду благодарна, если отметите 

 
22.09.12
Лучший ответ по мнению автора

Еva
Рейтинг: 122 043
6-й в Учебе и науке
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Похожие вопросы
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store
  • карты visa
  • карты master card
  • карты maestro
  • карты МИР
Мы используем файлы cookie. Пользуясь сайтом, вы принимаете условия нашего соглашения. Принять Детальнее