Введите строку из 5 чисел компьютер должен определить отрицательные числа
164
271
Ответы на вопрос:
Var a: array[1..5] of integer; i: integer; begin for i: =1 to 5 do readln(a[i]); for i: =1 to 5 do if a[i] < 0 then write(a[i],' '); writeln('- отрицательные'); readln; end.так?
Популярно: Информатика
-
mordecaill12230.10.2020 22:29
-
geniusdavidus04.07.2020 14:13
-
sasha6050320.04.2023 19:17
-
adilimanaliev0309.10.2021 14:28
-
August33306.09.2021 09:09
-
vlmx2freddy02.11.2020 22:26
-
alecsYouTube17.10.2022 06:37
-
cystan9807.03.2023 16:39
-
Enot81123.08.2020 14:59
-
MilkaKotik1631.12.2021 04:09