Задание

Определите какого типа будут величины в следующей программе?
Var х1, у1, х2, у2, d: .......
Begin
Write \(‘введите координаты х1, у1, х2, у2 = ’\);
Readln \(х1, у1, х2, у2\);
d := SQRT\(sqr\(x1 \- x2\)+sqr\(y1 \- y2\));
Write\(‘расстояние = ’, d : 7 : 3\);
End.

  • real
  • longint
  • integer
  • boolean