Календарь
< Сентябрь 2011 >
П В С Ч П С В
      1 2 3 4
5 6 7 8 9 10 11
12 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30    
Теги

 

 

{ Определить лежит ли точка а на прямой y=kx+l }

 

uses crt;

var x,y,l,k : integer;

begin

clrscr;

write('x=');readln(x);

write('y=');readln(y);

write('k=');readln(k);

write('l=');readln(l);

if y=k*x+l then write('Да')

else write('Нет');

readln;

end.