Есть ответ 👍

Как получить капирование со следом​

114
284
Посмотреть ответы 3

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


Білемеймін давай жаман ком жазбандар


если в пейнте, то shift

Объяснение:


1. const n = 10; var i,s: integer; m: array [1..n] of integer; begin        randomize;   s: =0;           for i: =1 to n do begin          m[i]: = random(201)-100;           writeln(m[i]);         end;         for i: =1 to n do          if m[i] mod 2 = 0 then          s: =s+m[i];         writeln('summa = ',s);           readln; end. 2. const n = 100; var i,p: integer; b: array [1..n] of integer; begin        randomize;   p: =0;         for i: =1 to n do begin        b[i]: = random(201)-100;           writeln(b[i]);         end;         for i: =1 to n do          if b[i] mod 3 = 0 then          p: =p*b[i];         writeln('proiz = ',p);           readln; end.

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