Написать программу в паскале.заполнить массив случайными величинами от -100 до 100.найти сумму элементоав массива.
142
467
Ответы на вопрос:
Const n=10; var a: array[1..n] of integer; i,s: integer; begin randomize; writeln('массив a: '); for i: =1 to n do begin a[i]: =random(201)-100; write(a[i]: 4); end; writeln; s: =0; for i: =1 to n do s: =s+a[i]; writeln('s = ',s); end. пример: массив a: 71 -39 57 33 52 -96 77 -79 -71 -79s = -74
//pascalabc.net //версия 3.3. сборка 1583 (25.11.2017) begin var a: array[1..100] of integer; var n,s: integer; write('введите размер массива: '); readln(n); for var i: =1 to n do begin a[i]: =random(-100,100); write(a[i],' '); s: =s+a[i]; end; writeln; writeln('сумма: ',s); readln; end.
Var a,r,rvp,rop: real; begin write('введите сторону квадрата и радиус окружности: '); readln(a,r); rvp: =a/2; rop: =a*sqrt(2)/2; if r< rvp then writeln('окружность расположена внутри вписанной') else if r=rvp then writeln('введен радиус вписанной окружности') else if r< rop then writeln('окружность расположена между вписанной и описанной') else if r=rop then writeln('введен радиус описанной окружности') else writeln('окружность расположена вне описанной') end. тестовое решение: введите сторону квадрата и радиус окружности: 8 5 окружность расположена между вписанной и описанной
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
DANIIL1231711.08.2020 15:39
-
Milena001103.08.2020 08:22
-
itrufanova201621.11.2021 06:57
-
natusestfons18.12.2021 18:32
-
albinka201705.07.2020 00:02
-
KristinaSagat5555512.02.2023 11:15
-
lolagrigoreva16.12.2020 02:58
-
мурзик5521.12.2022 08:18
-
SanyaVetka17.12.2022 20:09
-
denglushakov116.08.2020 07:20
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.