Ответы на вопрос:
Var a,i: integer; m: array[1..10] of integer; begin a: =10; randomize; for i: =1 to a do begin m[i]: =random(21); end; for i: =1 to a do if (m[i]> 5) and (m[i]< 15) then writeln(m[i]); end.
Популярно: Информатика
-
Error6901.02.2020 22:11
-
юлианна201814.01.2022 00:10
-
murrtinez25.02.2021 01:17
-
вероника106206.05.2021 01:55
-
YuKruglova119.02.2023 23:13
-
vvvtalik322.01.2022 22:54
-
Outrage12.07.2021 01:28
-
RaspberryYogurt02.03.2020 00:59
-
anny6009.09.2022 19:07
-
ФёдорХоменко16.04.2021 21:29