Question

Avionul Boeing in timp de o oră isi ia viteză v. în cît timp el zboară fistanta s t= s/v. Faceti program in pascal va rog urgent ​

Answer 1

Răspuns:

Program timp;

var t,s,v:integer;

begin

write('distanta : ');

read(s);

writeln;

write('viteza : ');

readln(v);

t:=d/v;

writeln('timpul=',t);

readln;

end.