Почему когда у меня включаетса paint то тогда у меня виключаетса интернет
179
439
Ответы на вопрос:
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.
Популярно: Информатика
-
kolotilka2301.11.2021 05:42
-
Rosalin118.12.2020 07:58
-
Leoger08.08.2020 15:55
-
Shkolnikt28.12.2022 01:28
-
xato200312.02.2023 07:20
-
Ivanna111111118.01.2020 02:18
-
GretaD25.05.2023 02:33
-
динка8229.01.2021 15:17
-
jybais22820.04.2020 01:38
-
hnwb21.04.2020 07:01