1. Главная
  2. Библиотека
  3. Информатика
  4. Дан массив натуральных чисел. Найти сумму элементов кратных данному N.

Дан массив натуральных чисел. Найти сумму элементов кратных данному N.

«Дан массив натуральных чисел. Найти сумму элементов кратных данному N.»
  • Информатика

Условие:

Дан массив натуральных чисел. Найти сумму элементов кратных данному N.

Решение:

Код программы:

var

A:array [1..100] of integer;

N,i,m,summa:integer;

begin

summa:=0;

write('Введите количество элементов массива: ');

readln(m);

write('Введите число N: ');

readln(N);

writeln(#10'CФормирова...

Не нашел нужную задачу?

Воспользуйся поиском

Выбери предмет