Ответы на вопрос:
Program pas02; uses crt; const n=20; var a: array[1..n] of real; i,k: integer; t: real; begin randomize; clrscr; writeln('массив случайных чисел'); k: =0; for i: =1 to n do begin a[i]: =random(31)-15.0; write(a[i]: 6: 1); if a[i]=10.0 then inc(k) end; writeln; writeln('количество элементов, равных 10: ',k); write('нулевые элементы '); k: =0; for i: =1 to n do if a[i]=0 then begin inc(k); write(i,' ') end; if k=0 then writeln('отсутствуют') else writeln; writeln('меняем местами элементы 3 и 6'); t: =a[3]; a[3]: =a[6]; a[6]: =t; for i: =1 to n do write(a[i]: 6: 1); writeln end. тестовое решение массив случайных чисел 2.0 -12.0 8.0 -2.0 -1.0 3.0 -12.0 -9.0 3.0 9.0 -8.0 0.0 -7.0 -4.0 -12.0 10.0 9.0 5.0 -8.0 6.0 количество элементов, равных 10: 1 нулевые элементы 12 меняем местами элементы 3 и 6 2.0 -12.0 3.0 -2.0 -1.0 8.0 -12.0 -9.0 3.0 9.0 -8.0 0.0 -7.0 -4.0 -12.0 10.0 9.0 5.0 -8.0 6.0
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
YankaManky18.06.2020 11:35
-
SOSplizz02.03.2020 12:38
-
kirilladmiiral28.10.2020 01:15
-
www2204200407.02.2020 14:59
-
pro100rak202.03.2022 17:23
-
Str1x025.09.2020 12:15
-
LopsterId123654321.07.2020 02:15
-
MAJlORIK22.07.2021 16:52
-
annasoloveva0202.07.2021 22:34
-
Эммикэт07.02.2023 05:45
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.