Программирование тема : процедуры дан массив, содержащий нулевые элементы. создать массив из номеров этих элементов.
268
491
Ответы на вопрос:
Pascal const n = 15; type mas = array [1..n] of integer; var m : mas; i : integer; procedure inic (var a : mas); var i : integer; begin for i : = 1 to n do a[i] : = 0; end; procedure num (var a : mas); var i : integer; begin for i : = 1 to n do a[i] : = i; end; procedure w (var a : mas); var i : integer; begin for i : = 1 to n do writeln (m[i]); readln (); end; begin inic (m); num(m); w(m); end.
Select count(*) from пациенты п, отделение о where п.код_отделения = о.код and о.название = "терапевтическое"
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
yanakuzmina101.03.2023 14:05
-
dimon56455703.10.2022 02:58
-
tor14200315.10.2021 01:23
-
lfhnvjk200729.03.2022 08:40
-
zaharovvlad133731.01.2021 10:49
-
babiron14.04.2021 21:20
-
dashasokolova2119.04.2022 23:53
-
Zeerorrrrrr12.07.2021 08:13
-
znanijacom7730.06.2020 10:35
-
jest227.04.2020 10:21
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.