• 1. Для одномерного массива вещественных чисел вычислить произведение значений тех элементов, которые не принадлежат отрезку [2;3]

Ответы 1

  • var i:integer;a:array[1..10] of real;p:real;beginp:=1;for i:=1 to 10 do beginreadln(a[i]);if(a[i]<2)or(a[i]>3)then p:=p*a[i];end;writeln('p=',p);end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years