Ajutati-ma sa fac un program PASCAL pentru a rezolva problema de mai jos.
Un automobil se deplaseaza cu viteza 60 km/h. Pina la benzinarie are de mers 1h. Spre aceeasi statie peco se deplaseaza un motociclist cu o viteza de 100 km/h. Cind vor ajunge automobilul si motociclistul la statie, daca stim ca s-au pornit in acelasi moment? Dar daca motociclistul porneste cu 10 minute intirziere?
Am incercat sa-l fac singura, dar nu prea mi-a reusit.
Răspunsuri la întrebare
Răspuns de
1
scriu si eu un text ca sa pot trimite raspunsul
Anexe:
lacrimioara1maricika:
Merci, am sa vad acusi cum merge:)
Iata ce mi-a iesit pina la urma:
program motoauto;
uses crt:
uses crt:
uses crt;
var vauto,vmoto,tauto:integer;
tmoto1,tmoto2:real;
begin
clrscr;
writeln('dati valori lui vauto');
readln(vauto);
writeln('dati valori lui vmoto');
readln(vmoto);
writeln('dati valori lui tauto');
readln(tauto);
tmoto1:=vauto*tauto/vmoto;
tmoto2:=tmoto1+0.16;
writeln('in primul caz motociclistul va ajunge peste:' ,tmoto1:6:2, 'ore');
writeln('in al doilea caz motociclistul va ajunge peste:' ,tmoto2:6:2, 'ore');
var vauto,vmoto,tauto:integer;
tmoto1,tmoto2:real;
begin
clrscr;
writeln('dati valori lui vauto');
readln(vauto);
writeln('dati valori lui vmoto');
readln(vmoto);
writeln('dati valori lui tauto');
readln(tauto);
tmoto1:=vauto*tauto/vmoto;
tmoto2:=tmoto1+0.16;
writeln('in primul caz motociclistul va ajunge peste:' ,tmoto1:6:2, 'ore');
writeln('in al doilea caz motociclistul va ajunge peste:' ,tmoto2:6:2, 'ore');
writeln('automobilistul va ajunge peste:' ,tauto, 'ore in ambele cazuri');
readln;
end.
readln;
end.
Alte întrebări interesante
Religie,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă