PDA

View Full Version : Aiutatemi devo fare un prog con turbo Pascal


liviz0640
29-08-2005, 17:19
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 :mc: :mc: :mc:

gtr84
29-08-2005, 17:41
nel 2005 c'è ancora qualcuno che usa il turbo Pascal?

liviz0640
29-08-2005, 17:45
Si il mio liceo scientifico :fagiano: :fagiano: si lo so sono un po obsoleti :cool:

gtr84
30-08-2005, 01:00
Si il mio liceo scientifico :fagiano: :fagiano: si lo so sono un po obsoleti :cool:

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

kaioh
30-08-2005, 01:10
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
30-08-2005, 07:43
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
30-08-2005, 10:47
non andare allo scientifico che non ti insegnano nulla ;)
p.s. io l' ho fatto e di turbo pascal non so nulla :stordita:

gtr84
30-08-2005, 13:28
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....