Надеюсь, ты хорошо разбираешься в единицах измерения информации? расставь их по возрастанию.   1 байт  10 мегабайт  1 килобайт  10 бит  12000 килобайт  1 гигабайт
180
278
Ответы на вопрос:
Program n1; var a: array[1..12] of integer; k,i: integer; p: real; begin randomize; k: =0; p: =1; write('исходный массив: '); for i: =1 to 12 do begin a[i]: =random(21)-10; write(a[i],' '); if (a[i]< 0) and (a[i] mod 3=0) then k: =k+1; if (a[i]< 10) and (a[i]> 0) then p: =p*a[i]; end; writeln; writeln(k); writeln(p); end.
Популярно: Информатика
-
berezniki1431.08.2022 19:10
-
vadkirkov17.01.2021 20:16
-
Lis666lis26.04.2021 17:41
-
iramaun07.05.2023 16:49
-
sofiyakoroleva307.09.2021 16:44
-
DariaMejor29.01.2021 09:53
-
Facegga15.08.2021 19:46
-
appleju02.03.2020 17:22
-
Puma2005041224.06.2022 03:21
-
01Таня1013.12.2021 17:36