массивыДан массив 50 целых чисел. Элементы массива могут принимать целочисленные значения

Массивы
Дан массив 50 целых чисел. Элементы массива могут принимать целочисленные значения от -40 до 40. Составьте программу вычисления суммы элеменов, меньших первого элемента.

Задать свой вопрос
Стефания Дурсенева
Паскаль?
1 ответ
For i := 1 to N do begin
if ((a[i]+a[i+1]) mod 2=0)and((a[i]*a[i+1])gt;40) then
 k:=k+1;
 end;
writeln(k);
Владислав Громков
Там далее что то еще же надобно?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт