Autobusas iš Vilniaus važiavo į Klaipėdą. Žinome, kokią kelio atkarpą per kiek laiko nuvažiavo, pvz., pirmus 15 km nuvažiavo per 1 val. ir 2 min., kitus 32,25 km nuvažiavo per 2 val. ir 6 min., ir t.t. Koks autobuso judėjimo vidutinis greitis? Skaičiuojant patogu laiką išreikšti tik valandomis arba tik minutėmis. Tam parašykite procedūrą. Rezultatą spausdinkite km per val. (pvz., “vidutinis greitis 52 km/val.”).
Pradžia: Autobuso judėjimo vidutinio greičio radimas.
Įvesti nuvažiuotų atkarpų skaičių n.
Kelias := 0
Laikas := 0
i := 1, n
Įvedamas atstumas ir kiek laiko užtruko
(Atkarpa, H, min)
Kelias := Kelias + Atkarpa
LaikasMin (H, min, RezultMin)
Laikas := Laikas + RezultMin
Išvedamas visas nuvažiuotas kelias.
Išvedamas visas kelionėje sugaištas laikas.
Laikas := Laikas / 60
v := Kelias / Laikas
Išvedamas autobuso judėjimo vidutinis greitis.
Pabaiga
3.3. Procedūros aprašymas
Pradžia: LaikasMin (var val, minutes, visosMin : integer);
visosMin := val * 60 + minutes
Programai grąžina reikšmes val, minutes, visosMin.
Pabaiga
3.4. Programos tekstas
// L4-7. Autobusas iš Vilniaus važiavo į Klaipėdą. Žinome, kokią kelio atkarpą
// per kiek laiko nuvažiavo, pvz., pirmus 15 km nuvažiavo per
// 1 val. ir 2 min., kitus 32,25 km nuvažiavo per 2 val. ir 6 min., ir t.t.
// Koks autobuso judėjimo vidutinis greitis? Skaičiuojant patogu laiką
// išreikšti tik valandomis arba tik minutėmis. Tam parašykite procedūrą.
// Rezultatą spausdinkite km per val.
// (pvz., "vidutinis greitis 52 km/val.")
// Data:
program L4_7;
var n, Atkarpa, H, min : integer; //...
Šį darbą sudaro 555 žodžiai, tikrai rasi tai, ko ieškai!
★ Klientai rekomenduoja
Šį rašto darbą rekomenduoja mūsų klientai. Ką tai reiškia?
Mūsų svetainėje pateikiama dešimtys tūkstančių skirtingų rašto darbų, kuriuos įkėlė daugybė moksleivių ir studentų su skirtingais gabumais. Būtent šis rašto darbas yra patikrintas specialistų ir rekomenduojamas kitų klientų, kurie po atsisiuntimo įvertino šį mokslo darbą teigiamai. Todėl galite būti tikri, kad šis pasirinkimas geriausias!
Norint atsisiųsti šį darbą spausk ☞ Peržiūrėti darbą mygtuką!
Mūsų mokslo darbų bazėje yra daugybė įvairių mokslo darbų, todėl tikrai atrasi sau tinkamą!
Panašūs darbai
Atsisiuntei rašto darbą ir neradai jame reikalingos informacijos? Pakeisime jį kitu nemokamai.
Pirkdamas daugiau nei vieną darbą, nuo sekančių darbų gausi 25% nuolaidą.
Išsirink norimus rašto darbus ir gauk juos akimirksniu po sėkmingo apmokėjimo!