Верхній регистр клавіатури вмикають клавішею а)сaps lock б)shift в)enter г)page up

Question

Информатика: Верхній регистр клавіатури вмикають клавішею а)сaps lock б)shift в)enter г)page up

Egorka12351727378 · Accepted Answer

Type   Point = record     x: integer;     y: integer;   end;   Line = record     P: Point;     Q: Point;     Len: double;   end; procedure LineLength(var pL: Line);   // Вычисляет и сохраняет значение длины отрезка begin   pL.Len := sqrt(sqr(pL.Q.x - pL.P.x) + sqr(pL.Q.y - pL.P.y)) end; var   A, B, C, D: Point;   AB, AC, AD, BC, BD, CD: Line; begin   writeln( Введите попарно координаты четырех точек );   readln(A.x, A.y, B.x, B.y, C.x, C.y, D.x, D.y);   with AB do   begin     P.x := A.x; P.y :=...

MOGZ ответил