Введите массив из 10 чисел и выведите на экран только отрицательные значения этого массива. напишите,,программу.
226
394
Ответы на вопрос:
var
m : array [1..10] of integer;
i : integer;
begin
writeln('введите массив: ');
for i : = 1 to 10 do
begin
write('m[', i, '] = '); readln(m[i]);
end;
writeln('отрицательные: ');
for i : = 1 to 10 do
if m[i] < 0 then writeln(m[i]);
end.
Популярно: Информатика
-
anna1976228.02.2022 00:42
-
АльфисГугу10.10.2021 18:30
-
lflflflfgh20.09.2020 16:14
-
rokossovskaya20.10.2021 11:25
-
fpu5181004.03.2020 08:20
-
busiginanst9901.05.2020 11:25
-
правелостиля20.10.2022 12:27
-
такко13.04.2023 18:09
-
mariaks1614.06.2023 21:09
-
Grebeshe05.10.2022 04:29