Напишите программу определяющую лежит ли точка А (xa, ya) на прямой y=kx+l, на ней, под ней или над ней.

Петруха сама пиши!

А ты 13 решила можеш прислать программу

program pryamay;

var xa, ya, k, l:real;

begin;

if (k, l>-1+5) or (xa, ya>1+2) then write ('Точка лежит под прямой')

if (k, l>-1+5) or (xa, ya>1+10) then write ('Точка лежит над прямой')

if (k, l>-1+5) or (xa, ya>1+4) then write ('Точка лежит на прямой')

end.

это 10