Мне через паскаль: разработать схему алгоритма для определения минимума из трёх чисел без использования логических операций. протестировать алгоритм на следующих исходных данных: а) 2 5 1 б) 0 -2 8 в) -4 5 10

172

237

Посмотреть ответы 3

Ответы на вопрос:

Кеккуккекукек

Информатика

4,6(75 оценок)

{рабочая программа. решение основано на определении модуля числа} var a, b, c, d: integer; begin read(a, b, c); d : = (a + b - abs(a - b)) div 2; writeln((d + c - abs(d - c)) div 2); end.

LizaSchoolTwo

Информатика

4,4(49 оценок)

Решение твоей

lisa22151

Информатика

4,4(38 оценок)

Var s, w: string; i, x, n, k, p, q: integer; begin writeln('введите фразу, разделяя слова ровно одним пробелом'); readln(s); write('введите номер слова для поиска: '); readln(x); { ищем в строке s местоположение слова номер х. его начальную позицию в строке обозначим p, а конечную - q } n : = length(s); i : = 1; k : = 0; p : = 0; q : = 0; repeat if s[i] = ' ' then begin inc(k); if k = x - 1 then p : = i + 1 else if k = x then q : = i - 1 end; if q = 0 then i : = i + 1 until (q > 0) or (i > n); if (p = 0) then writeln('количество слов в строке меньше ', x) else if q = 0 then q : = n; w : = copy(s, p, q - p + 1); if (pos('а', w) > 0) or (pos('о', w) > 0) then writeln('одна из букв (а,о) есть в слове "', w, '"') else writeln('в слове "', w, '" нет ни буквы а, ни буквы о') end. тестовое решение: введите фразу, разделяя слова ровно одним пробелом самая лучшая рыба- это колбаса! введите номер слова для поиска: 5 одна из букв (а,о) есть в слове "колбаса! " введите фразу, разделяя слова ровно одним пробелом тестирование программ может служить доказательством наличия ошибок, но никогда не докажет их отсутствие! » эд. дейкстра, 1972 г. введите номер слова для поиска: 4 в слове "служить" нет ни буквы а, ни буквы о

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.