Регистрация
maksikus1
19.02.2020 02:02
Информатика
Есть ответ 👍

Соотнесите информатика

291
389
Посмотреть ответы 2

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

0LOLOLOSHKA1
0LOLOLOSHKA1
4,4(90 оценок)

не пончл мне тоже надо

Объяснение:

jajahahah81817
jajahahah81817
4,8(4 оценок)
Program asd; uses crt; const n=5; var a: array[1..n] of integer; var p,s: real;   i: integer; begin clrscr; for i: =1 to n do   begin  a[i]: =random(100)+1;     write(a[i]: 4);   end;   p: =1;     for i: =1 to n do    begin    if a[i] mod 3=0 then    begin    s: =s+a[i];   p: =p*a[i];   end;     end;     writeln;   writeln('сумма матрицы: ',s,' произведение матрицы: ',p); end.

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