Laboratoriniai darbai

Free Pascal (FP). Procedūros. Vidutinio greičio skaičiavimas

9.8   (3 atsiliepimai)
Free Pascal (FP). Procedūros. Vidutinio greičio skaičiavimas 1 puslapis
Free Pascal (FP). Procedūros. Vidutinio greičio skaičiavimas 2 puslapis
Free Pascal (FP). Procedūros. Vidutinio greičio skaičiavimas 3 puslapis
www.nemoku.lt
www.nemoku.lt
Aukščiau pateiktos peržiūros nuotraukos yra sumažintos kokybės. Norėdami matyti visą darbą, spustelkite peržiūrėti darbą.
Ištrauka

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; //...

Daugiau informacijos...

Šį 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!

Detali informacija
Darbo tipas
Lygis
Universitetinis
Failo tipas
Word failas (.doc)
Apimtis
3 psl., (555 ž.)
Darbo duomenys
  • Informatikos laboratorinis darbas
  • 3 psl., (555 ž.)
  • Word failas 74 KB
  • Lygis: Universitetinis
www.nemoku.lt Atsisiųsti šį laboratorinį darbą

www.nemoku.lt Panašūs darbai

Free Pascal (FP). Funkcijos. Vyriausio mokinio amžiaus skaičiavimas dienomis.

Free Pascal (FP). Funkcijos. Vyriausio mokinio amžiaus skaičiavimas dienomis. Informatika Peržiūrėti darbą

Free Pascal (FP). Triženkliai, kurie dalijasi iš nurodytų skaičių

Free Pascal (FP). Triženkliai, kurie dalijasi iš nurodytų skaičių Informatika Peržiūrėti darbą

MUITINĖS PROCEDŪROS ir MUITAS

MUITINĖS PROCEDŪROS ir MUITAS Informatika Peržiūrėti darbą

Apkrovų ir įrenginių kiekio telefono tinkle skaičiavimas

Apkrovų ir įrenginių kiekio telefono tinkle skaičiavimas Informatika Peržiūrėti darbą
Privalumai
Pakeitimo garantija Darbo pakeitimo garantija

Atsisiuntei rašto darbą ir neradai jame reikalingos informacijos? Pakeisime jį kitu nemokamai.

Sutaupyk 25% pirkdamas daugiau Gauk 25% nuolaidą

Pirkdamas daugiau nei vieną darbą, nuo sekančių darbų gausi 25% nuolaidą.

Greitas aptarnavimas Greitas aptarnavimas

Išsirink norimus rašto darbus ir gauk juos akimirksniu po sėkmingo apmokėjimo!

Atsiliepimai
www.nemoku.lt
Dainius Studentas
Naudojuosi nuo pirmo kurso ir visad randu tai, ko reikia. O ypač smagu, kad įdėjęs darbą gaunu bet kurį nemokamai. Geras puslapis.
www.nemoku.lt
Aurimas Studentas
Puiki svetainė, refleksija pilnai pateisino visus lūkesčius.
www.nemoku.lt
Greta Moksleivė
Pirkau rašto darbą, viskas gerai.
www.nemoku.lt
Skaistė Studentė
Užmačiau šią svetainę kursiokės kompiuteryje. :D Ką galiu pasakyti, iš kitur ir nebesisiunčiu, kai čia yra viskas ko reikia.

Palaukite! Šį darbą galite atsisiųsti visiškai NEMOKAMAI!

Įkelkite bet kokį savo turimą mokslo darbą ir už kiekvieną įkeltą darbą būsite apdovanoti - gausite dovanų kodus, skirtus nemokamai parsisiųsti jums reikalingus rašto darbus.
Vilkti dokumentus čia:

.doc, .docx, .pdf, .ppt, .pptx, .odt