На строке 9 "if x>=-7.5 and x<2 then y:=(a*sqrt(abs(x+6))); " в том месте, где выделено жирным, компилятор думает, что необходимо произвести побитовое умножение числа с плавающей точкой типа real -7.5 и целого числа x. Т.к. побитовое умножение применимо только к целым числам, компилятор пытается преобразовать -7.5 к целому числу, т.е. к integer, и у него это не получается, о чем он Вам и говорит.
Чтобы он не думал, что Вы собираетесь производить побитовое умножение (ведь Вы хотите произвести логическую операцию между результатами двух сравнений), нужно занести в скобки выражения x>=-7.5 и x<2, чтобы получилась такая строка: "if (x>=-7.5) and (x<2) then y:=(a*sqrt(abs(x+6))); "
получения информации
Информация может быть:
· открытой (более или менее доступной);
· полузакрытой (не засекреченной, но контролируемой теми, кого она касается);
· секретной (полагаемой по различным соображениям ключевой в определенных ситуациях).
Главными носителями информации являются:
1. Знающие люди;
К ним относятся:
· Эксперт. Это - индивид, чьи профессиональные знания и контакты (как работа, так и хобби) обеспечивают первоклассную ориентацию в разрабатываемом вопросе.
· Внутренний информатор (осведомитель). - Это - человек из группировки противника, завербованный и поставляющий фактуру по материальным, моральным и иным весомым для него причинам.
1. Python
n = list(input())
x = list(input())
b = list(input())
c = n + x + b
print(max(c))
Pascal не знаю :>