Даны точки А,В,С. Определить какая точка дальше от начала координат — Basic(Бейсик)

DIM L(1 TO 3)
L(1) = sqrt(Ax^2 + Ay^2)
L(2) = sqrt(Bx^2 + By^2)
L(3) = sqrt(Cx^2 + Cy^2)
max=1
FOR i=2 TO 3
  IF L(max) < L(i) THEN max=i
NEXT i
PRINT CHR$(max+64)

Leave a Comment