Вычислить сумму элементов массива с чётными значениями

@Bagram1337 · Регистрация: 01.02.2023

Author24 — интернет-сервис помощи студентам

Составьте программу, которая заполняет массив а [10..20] случайными целыми числами в диапазоне от -8 до 18 и вычисляет сумму элементов массива с чётными значениями.

@bormant · 01.02.2023, 11:42

Основная идея:

Pascal

const ra=-8; rb=18; al=10; ar=20;
var a: array [al..ar] of Integer;
...
  for i:=al to ar do a[i]:=ra+Random(rb-ra+1);
  {s:=0;}
  for i:=al to ar do if not Odd(a[i]) then Inc(s,a[i]);

@Bagram1337 0 / 0 / 0 Регистрация: 01.02.2023 Сообщений: 1
		1
	Вычислить сумму элементов массива с чётными значениями 01.02.2023, 11:00. Показов 328. Ответов 1 Метки нет (Все метки) Составьте программу, которая заполняет массив а [10..20] случайными целыми числами в диапазоне от -8 до 18 и вычисляет сумму элементов массива с чётными значениями. 0

	01.02.2023, 11:42