Составить программу, которая заполняет массив b [1..10] случайными целыми числами в диапазоне от 1 до 15 и находит количество с нечётными значениями
220
266
Ответы на вопрос:
Var mass: array[1..10] of integer; i,g,s: integer; begin randomize; writeln('введите максимальное случайное число'); readln(i); for g: =1 to 10 do begin mass[g]: =random(i)+1; if (mass[g] mod 2) = 0 then s: =s+1; writeln(mass[g]); end; writeln('количество четных в массиве = '+s); writeln('количество нечетных в массиве = '+(10-s)); end.
ответ:
архитектору - проектирование, программы для расчетов
врачу - база данных пациентов, свободная энциклопедия для расширения знаний
учителю - сейчас вводят электронные дневники, презентации
бизнесмену - база данных, учет и расчет
композитору - обработка и запись музыки, хранение текстов нот
секретарю - база данных
писателю - соответственно писать
художнику - веб дизайн
модельеру - проектирование, моделирование
объяснение:
Популярно: Информатика
-
Zggzsbsnnzh17.06.2023 23:33
-
kristinalogvin2025.02.2022 13:32
-
smokenmyr21.02.2022 16:31
-
pukishandpapish09.03.2021 13:59
-
Влад505515.09.2020 06:28
-
turanaliev24120231.05.2023 00:28
-
1804lenalb22.11.2022 11:42
-
Vanik2001120.11.2021 16:02
-
kushkulina201121.05.2021 09:21
-
daridasha57ү07.07.2021 12:02