Операция 'and' не применима к типу KeyValuePair<real,integer>

@Kaberungula · Регистрация: 24.05.2016

Студворк — интернет-сервис помощи студентам

Показывает ошибку "Операция 'and' не применима к типу KeyValuePair<real,integer>"

Pascal

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.

Подскажите, пожалуйста, что не так?

@ZX Spectrum-128 · 24.05.2016, 18:36

Pascal

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.

Опции темы