Регистрация
адевале1
04.02.2022 01:28
Информатика
Есть ответ 👍

1.дан массив натуральных чисел. найти сумму элементов, кратных данному к. написать программу в питоне

207
356
Посмотреть ответы 2

Ответы на вопрос:

wiryc
wiryc
4,6(41 оценок)

ответ:

program num1;

uses crt;

var

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

i,k,n, s : integer;

begin

clrscr;

s: =0;

write('k='); readln(k);

write('n='); readln(n);

for i: =1 to n do 

readln(a[i]);

for i: =1 to n do

if (a[i] mod k)=0 then s: =s+a[i];

writeln('s=',s);

end.

assija56
assija56
4,5(27 оценок)
6= 3*2 = 1*6 1116 1161 1611 6111 2311 3211 2131 3121 2113 3112 1231 1321 1213 1312 1123 1132 4 + 4*3 = 16

Популярно: Информатика