Написать программу для паскаль abc, которая меняет в массиве наибольшее и наименьшее число. например, исходные числа: 5 6 1 2 7 программа меняет на: 5 6 7 2 1
242
320
Ответы на вопрос:
Program n1; const n = 6; var a : array[1..n] of integer; i, max, min, temp : integer; begin for i : = 1 to n do readln(a[i]); min : = 1; max : = 1; for i : = 1 to n do begin if a[i] > a[max] then max : = i; if a[i] < a[min] then min : = i; end; temp : = a[max]; a[max] : = a[min]; a[min] : = temp; for i : = 1 to n do write(a[i],' '); end.
Var a,b,c: word; begin read(a,b,c); if (a+b> c) and (a+c> b) and (b+c> a) then begin write('est'); if (sqr(a)> sqr(b)+sqr(c)) or (sqr(c)> sqr(b)+sqr(a)) or (sqr(a)> sqr(c)+sqr(b)) then write ('tupoy') end else write('net'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
2006otvet21.06.2021 09:14
-
valery290529.08.2021 20:33
-
vikakittenlove07.10.2022 06:26
-
lediaikiu23.05.2021 18:17
-
Shkaf223.05.2021 05:52
-
VaSa454703.02.2020 18:20
-
Ekateika18.12.2021 19:49
-
урган125.10.2020 22:46
-
bondarsofia04.08.2020 03:52
-
Saca200007.11.2021 13:46
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.