Доброго времени суток. , составить программу в паскале. дана последовательность вещественных чисел, содержащих n=15 элементов. построить из неё новую последовательность, так чтобы в её начале располагались все отрицательные, а затем все положительные числа и нули. относительный порядок расположения как отрицательных, так и не отрицательных должен быть сохранён
194
353
Ответы на вопрос:
Var res,mas: array[1..100] of real; k,i: integer; begin k: =0; for i: =1 to 15 do read(mas[i]); for i: =1 to 15 do begin if mas[i]< 0 then write(mas[i],' ') else begin k: =k+1; res[k]: =mas[i]; end; end; for i: =1 to k do write(res[i],' '); end.
Объяснение:
Есть 2 вида блока недвижемые и двежимые какой нада бери. Это физия, в информатике я не шарю
Популярно: Информатика
-
ffgdfsdf15.03.2021 11:16
-
polatovskiy200217.02.2020 16:12
-
alisgranger24.02.2023 10:33
-
ERKO2027.05.2023 13:24
-
romasivtsov24.06.2022 23:13
-
evgenypuchnin221.06.2020 00:01
-
Sabina078617.10.2020 15:17
-
veshove14.02.2023 22:02
-
all27116.01.2020 20:38
-
ladyplahtiy25.08.2022 01:16