Написать программу на паскале написать программу генератора случайных чисел от -100 до 100, и сделать так, чтобы сбоку от отрицательного числа показывалось такое же положительное 15
149
159
Ответы на вопрос:
Var i: integer; mas: array [1..5] of integer; begin randomize; for i: =1 to 5 do begin mas[i]: =random(-100,100); write(mas[i],' '); end; writeln(' '); for i: =1 to 5 do begin if mas[i]< 0 then write(mas[i],' ',abs(mas[i]),' ') else write(mas[i],' '); end; end.
Pascalabc.net 3.4.0, сборка 1675 от 12.06.2018 внимание! если программа не работает, обновите версию! procedure println(self: array of real); extensionmethod; begin self.batch(5).foreach(s-> begin foreach var p in s do write(p: 15: 10); writeln end); writeln(min(15*(self.count div 2),38)*'- ') end; begin var m: =arrgen(readinteger('n='),i-> cos(i),1); m.println; var (a,b): =readreal2('введите границы a b: '); writeln('число элементов на интервале [',a,',',b,'] равно ', m.where(t-> t.between(a,); write('сумма элементов, расположенных после максимального, равна '); var imax: =m.indexmax; (m? [imax+1: ].sum).println; writeln('элементы, по убыванию модулей'); m: =m.orderbydescending(t-> abs(; m.println; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
23redalice1122.06.2020 06:33
-
Vrentor03.09.2020 20:36
-
vauguq15.09.2022 19:33
-
yiliamasegorova13.06.2022 10:41
-
Марина2410200801.04.2020 02:51
-
dfggdsddfdddf18.12.2021 14:07
-
evakazakova2029.01.2020 03:55
-
yurafenchishin17.09.2022 04:01
-
Dasha55551111101.03.2021 12:47
-
Акакий5518.03.2022 13:46
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.