)информатика ввод 10 элементов массива случайным образом из диапазона от (-50,50). посчитать кол-во отрицательных чисел. написать программу
141
263
Ответы на вопрос:
// pascalabc.net 3.1, сборка 1211 от 31.03.2016 begin var a: =arrrandom(10,-50,50); a.println; writeln('отрицательных ',a.where(x-> x< 0).count) end. тестовое решение: 37 -20 2 -13 10 9 -25 11 8 -3 отрицательных 4
Var a: array[1..10] of integer; i, n: integer; begin for i : = 1 to 10 do begin a[i] : = random(101) - 50; if a[i] < 0 then n : = n + 1; write(a[i]: 4); end; writeln; writeln('количество отрицательных = ', n); end. тестовое решение 30 1 -23 -36 15 -40 18 38 43 47 количество отрицательных = 3
Популярно: Информатика
-
Vicka200603.03.2023 03:09
-
СвятаяИра25.02.2020 22:54
-
sergejryazanov22806.06.2021 01:58
-
dankorolckov2027.10.2022 07:52
-
скрытый329.01.2023 22:30
-
lovemopeio23.07.2021 09:52
-
sukhodolova12.04.2020 06:37
-
200646412.01.2023 06:14
-
dianadiadyshyn04.02.2021 06:54
-
Timewinter20.08.2020 12:20