Где ошибка? ? const n=10; type tmas=array[1..n] of integer; var mas1: tmas; procedure imputmas1(var mastmas: integer); var i: integer; begin for i: =1 to 10 do begin mas1[i]: =random(n); write(mas1[i]: 3); end; end.
Ответы на вопрос:
ну так во первых обяъвление процедуры должно быть
procedure inputmas1(var mas1: tmas );
во вторых ты забыл end; т.е
begin for i: =1 to 10 do begin mas1[i]: =random(n); write(mas1[i]: 3); end; end; {забытый end}
в третьих ты не написал основную прграмму т.е забыл begin и не вызвал процедуру
inputmas1
begin
clrscr; inputmas1(mas1);
readkey; end.
итого прога должна выглядеть примерно так
program massivuses crt; const n=10; type tmas=array[1..n] of integer; var mas1: tmas;
procedure inputmas1(var mas1: tmas); var i: integer; begin for i: =1 to 10 do begin mas1[i]: =random(n); write(mas1[i]: 3); end; end; {основная прога}begin clrscr; inputmas1(mas1); readkey; end.
держи ! пользуйся на здоровье и будь внимательнее.
4.
Объяснение:
При каждой итерации к a будет прибавляться 1.
Но a изначально - 1.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
stepnikitka27.09.2021 14:40
-
lilia2502107.07.2022 00:43
-
Шпунтя15.04.2021 14:31
-
Барбоси14.10.2020 17:31
-
mitskevich07714.03.2021 00:47
-
Денис228ннпп29.05.2022 17:27
-
fhshjshetubehdh06.05.2023 15:59
-
Vinyl9818.02.2020 20:52
-
tsovinarjangiryan04.01.2021 10:55
-
Али2006111124.12.2020 23:43
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.