Есть ответ 👍

Дан фрагмент электронной таблицы В ячейку С3 введена формула =$D$1*(A3-
B3). Формула была скопирована в ячейки С4,
С5 и С6.

СОР

210
452
Посмотреть ответы 1

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


Var     s,i,a,k: integer;     m: array[1..20]of integer; begin write('введите а и k: '); readln(a,k); writeln('массив: '); for i: =1 to 20 do   begin   m[i]: =random(20);   write(m[i],' ');   if m[i] mod 2=1   then s: =s+m[i];   end; writeln; writeln('сумма нечетных: ',s); write('искомыe индексы: '); for i: =1 to 20 do   if m[i]> a then write(i,'; '); writeln; writeln('положитеьные, кратые ',k,': '); for i: =1 to 20 do   if (m[i]> 0) and (m[i] mod k=0) then write(m[i],'; ');   end.

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