Просуммировать только те элементы, значения которых кратно № вашего компьютера. (мой номер компьютера 12865241)
Алгоритм:
- заполнить массив элементами;
- организовать цикл по суммированию элементов массива;
- проверить в цикле условие кратности № вашего компьютера. Если условие выполняется, то добавить значение элемента к сумме.
Ответы
Ответ дал:
0
Ответ:
Код ниже
Объяснение:
program sumDivisableNumbers;
const n = 2500;
var d, S, i: integer;
arr: array [1..n] of integer;
begin
randomize;
writeln('Введите номер Вашего компьютера');
readln(d);
S := 0;
for i := 1 to n do begin
arr[i] := Random(20000000);
if (arr[i] mod d = 0) then S := S + arr[i]
end;
writeln('Сумма равна ', S);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад