Паскаль ввести с клавиатуры пять символов: две цифры, знак вопроса, две цифры. вывести на экран знак того, как первое двузначное число относится ко второму двузначному числу (больше, меньше или равны -- > , < , =). запрещается пользоваться какими-либо переменными, кроме символьных. также запрещается использовать операцию умножения, циклы и операцию сложения строк (и, соответственно, симво

245

263

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

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

Sharapov2000

Информатика

4,7(3 оценок)

Программа на паскале (без проверки правильности ввода): var s: string; a,b,code: integer; begin write('s = '); readln(s); val(s[1]+s[2],a,code); val(s[4]+s[5],b,code); if a> =b then writeln(a,'> ',b) else if a< b then writeln(a,'< ',b) else writeln(a,'=',b); end. пример: s = 67? 94 67< 94

Милааа11

Информатика

4,8(5 оценок)

program sport; uses crt; const n = 10; {количество оценок}var {раздел описания переменных} a: array [1..n] of integer; {массив с оценками} max,min,i: integer; {max и min - наибольшая и наименьшая оценки; i -счётчик} sum: real; {сумма, а потом среднее арифметическое (результат)} begin writeln('просим судей выставить свои оценки: '); {вывод строки} for i: =1 to n do {организуем цикл ввода оценок} begin write(i,'-й судья: '); readln(a[i]); {вывод строки и ввод оценки} end; writeln(); {вывод пустой строки (для красоты)} min: =a[1]; {предполагаем для начала, что первая оценка - наименьшая} max: =a[1]; {также предполагаем для начала, что первая оценка - наибольшая} sum: =0; {для начала сумма равна 0} for i: =1 to n do {организуем цикл для перебора всех оценок} begin if max< a[i] then max: =a[i]; {если текущая оценка больше max, то запоминаем её в max} if min> a[i] then min: =a[i]; {если текущая оценка меньше min, то запоминаем её в min} sum: =sum+a[i]; {добавляем текущую оценку к сумме} end; sum: =(sum-max-min)/(n-2); {здесь самое интересное: из суммы всех оценок вычитаем наибольшую и наименьшую, а полученный результат делим на 8 - количество оставшихся оценок. получается среднее арифметическое} writeln('итоговая оценка ',sum: 7: 2) {выводим результат} end.

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

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

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

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

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

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

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

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

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

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