Program1.pas(7) : Нельзя преобразовать тип KeyValuePair<real,integer> к real

@Rasul86 · Регистрация: 16.05.2016

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

Pascal

program pomogite;
var x, y: real;
begin
  readln(x);
  if x=>-2 and 3>=x then y:=sqrt(x*x+4)
    else 
    if x>3 then y:=6*x+8
    else y:=3*x*x*x*x*x-4;
    writeln(y:4:2);
end.

@ZX Spectrum-128 · 16.05.2016, 20:48

Pascal

program pomogite;
 
var
  x, y: real;
 
begin
  readln(x);
  if (x>=-2) and (x >= 3) then 
    y := sqrt(x * x + 4)
  else 
  if x > 3 then 
    y := 6 * x + 8
  else 
    y := 3 * x * x * x * x * x - 4;
  writeln(y:4:2);
end.

	16.05.2016, 20:48