Имеется 5 деревьев: дуб, сирень, лиственница, сосна, пальма. общий признак дуба, сосны и пальмы.
169
362
Ответы на вопрос:
Const k = 15; var r: array[1..k] of integer; i,p,o,n: integer; begin randomize; p: =0; n: =0; o: =0; for i: = 1 to k do begin r[i]: =2*random(k)-k; write(r[i],' '); if r[i] > 0 then p: =p+1 else if r[i] = 0 then n: =n+1 else o: =o+1; end; writeln; writeln('p = ',p); writeln('n = ',n); writeln('o = ',o); end.
Популярно: Информатика
-
myster221.02.2021 17:59
-
PotyLive06.07.2021 05:26
-
Aizek11101.05.2021 10:21
-
Ellenkpop30.04.2023 15:50
-
BOGDANPETRYEV13.04.2020 10:45
-
zhenya21414.04.2021 03:09
-
Olegbro36468217.09.2021 06:07
-
BooWim08.11.2020 14:13
-
tanya24010214.04.2020 19:30
-
goida8228.12.2020 01:40