Операция 'and' не применима к типу KeyValuePair - Pascal ABC
Формулировка задачи:
Показывает ошибку "Операция 'and' не применима к типу KeyValuePair<real,integer>"
Подскажите, пожалуйста, что не так?
Листинг программы
- VAR X, X1, Y1, Y : REAL;
- begin
- WRITELN ( ‘ВВЕДИ X:’);
- READLN (X);
- Y:= EXP ((-X+1)*LN (3) ) * SIN (X);
- WRITELN (‘ При Х=’, X: 8:3, ‘Y=’, Y: 8:4);
- WRITELN (‘ Y11=’, TRUNC (Y): 4, ‘Y22=’, ROUND (Y): 4);
- WRITELN (‘ВВЕДИ КООРДИНАТЫ: Х1, Y1’);
- READLN (X1, Y1);
- WRITELN ((X1=>0) AND (Y1=>0) AND (SQR (X) + SQR (Y) <=1));
- END.
Решение задачи: «Операция 'and' не применима к типу KeyValuePair»
textual
Листинг программы
- var
- X, X1, Y1, Y: REAL;
- begin
- WRITELN('ВВЕДИ X: ');
- READLN(X);
- Y := EXP((-X + 1) * LN(3) ) * SIN(X);
- WRITELN(' При Х=', X:8:3, 'Y= ', Y:8:4);
- WRITELN(' Y11= ', TRUNC(Y):4, 'Y22= ', ROUND(Y):4);
- WRITELN('ВВЕДИ КООРДИНАТЫ: Х1, Y1 ');
- READLN(X1, Y1);
- WRITELN((X1>=0) AND (Y1>=0) AND ((SQR(X) + SQR(Y)) <= 1));
- end.
Объяснение кода листинга программы
- Объявляются переменные X, X1, Y1, Y типа REAL.
- Выводится сообщение «ВВЕДИ X: », после чего пользователю предлагается ввести значение переменной X.
- Вычисляется значение Y по формуле Y = EXP((-X + 1) LN(3)) SIN(X).
- Выводятся значения X и Y с помощью функции WRITELN().
- Выводится сообщение «При Х=», после чего выводятся значения X и Y с помощью функций TRUNC() и ROUND() для округления до 4 знаков после запятой.
- Выводится сообщение «ВВЕДИ КООРДИНАТЫ: Х1, Y1 », после чего пользователю предлагается ввести значения переменных X1 и Y1.
- Вычисляется значение выражения (X1>=0) AND (Y1>=0) AND ((SQR(X) + SQR(Y)) <= 1) с помощью оператора AND.
- Программа завершается.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д