Завтра экзамен! с клавиатуры вводятся вещественные числа. признак конца ввода - 0. определить, является ли вводимая последовательность по невозрастанию или по неубыванию (pascalabc).
198
449
Ответы на вопрос:
Var x, x1: integer; breakloop, nondescending: boolean; begin writeln('вводите числовую последовательность'); read(x); read(x1); nondescending : = (x1 > = x); repeat read(x); if x < > 0 then if nondescending then breakloop : = (x < x1) else breakloop : = (x > x1); x1 : = x until breakloop or (x = 0); if breakloop then writeln(#13#10, 'последовательность ') else if nondescending then writeln(#13#10, 'последовательность неубывающая') else writeln(#13#10, 'последовательность невозрастающая') end. тестовое решение вводите числовую последовательность 7 12 12 18 34 0 последовательность неубывающая
Var a, c: boolean; b, b1: integer; begin readln(b); readln(b1); if (b > b1) then a : = true else if (b1 > b) then a : = false; while (true) do begin readln(b1); if (0 in [b, b1]) then break; if a then begin if (b < b1) then c : = true; end else if (b > b1) then c : = true; b : = b1; end; if c then writeln('случайная') else if (a) then writeln('невозрастающая') else writeln('неубывающая'); end. само собой, должно быть минимум 2 числа в последовательности: )
стройства ввода предназначены для ввода информации в компьютер. К устройствам ввода относятся клавиатура, мышь, сканер, микрофон, джойстик, световое перо, web-камера и ряд других устройств.
Объяснение:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
AндрeйTh13.09.2021 04:44
-
liza144917.03.2022 03:28
-
Mikkail29.06.2022 22:02
-
innarudenkoco11.01.2022 13:01
-
nnursejt04.10.2021 13:10
-
Bироника08.06.2021 17:49
-
ruzall05.05.2020 02:54
-
ангелина12345654321623.11.2021 11:03
-
djkls30.01.2021 09:16
-
Kir290504.06.2023 00:33
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.