Aiutatemi devo fare un prog con turbo Pascal

[liviz0640]

Ciao ragazzi c'è qualcuno che mi saprebbe aiutare con turbo pascal?
Devo scrive un programma in cui ferifico l'esistenza di un punto su una retta.
Aiuto vi prego

[gtr84]

nel 2005 c'è ancora qualcuno che usa il turbo Pascal?

[liviz0640]

Si il mio liceo scientifico si lo so sono un po obsoleti

[gtr84]

Originariamente inviato da liviz0640

Si il mio liceo scientifico si lo so sono un po obsoleti

è un programma che vi ha dato da fare il vostro prof?

[kaioh]

l'equazione della retta è y=mx+q , una volta immessi i parametri basta che il punto ( Xo,Yo) soddisfi all'equazione della retta , cioè Y0=mXo+q

bastanole sole funzioni writeln, readln e basta .

[Adrian Sassatelli]

Qualcosa del genere:

const
  m = 10;
  q = 10;

var x, y: integer;

begin
  writeln ('Inserisci valore X'); readln (x);
  writeln ('Inserisci valore Y'); readln (y);

  if y=m*x+q then
    writeln ('Il punto è nella retta.')
  else
    writeln ('Il punto non è nella retta.');
end.

[midian]

non andare allo scientifico che non ti insegnano nulla
p.s. io l' ho fatto e di turbo pascal non so nulla

[gtr84]

Originariamente inviato da Adrian Sassatelli

Qualcosa del genere:

const
  m = 10;
  q = 10;

var x, y: integer;

begin
  writeln ('Inserisci valore X'); readln (x);
  writeln ('Inserisci valore Y'); readln (y);

  if y=m*x+q then
    writeln ('Il punto è nella retta.')
  else
    writeln ('Il punto non è nella retta.');
end.

perchè x e y integer?

sono variabili reali....