Ответы на вопрос:
Program minus; var a: array(1..100) of longint; i: integer; begin for i: =1 to length(a) do begin if a[i] < 0 then writeln(a[i]); end; end.
Популярно: Информатика
-
овшаь08.09.2021 05:03
-
sashafedorishyn13.07.2022 13:20
-
CoolGirl7810.12.2021 02:16
-
mrsexobeat30812.11.2020 09:00
-
maxon2323.03.2023 21:44
-
nikitabelokon2128.05.2020 22:48
-
75576606.11.2022 20:58
-
kjk123ggt13.05.2021 10:07
-
Marinr03.12.2020 12:06
-
5Юра111111126.02.2020 03:00