Pascal Programma, kura aprēķina laiku cik ilgi jābrauc

Moderatori: janis.wd, Vecākie lietotāji

eriksu2
Reģistrēts lietotājs
Atbildes: 130
Pievienojies: 12 Okt 2009, 19:58
Reputācija: 0

Pascal Programma, kura aprēķina laiku cik ilgi jābrauc

Post no eriksu2 » 14 Feb 2010, 15:27

Labdien!
Skolā ir uzdots uzdevums, izveidot kādu pascal programmu, bet tā kā mēs par pascal mācīties sākām nesen, tad esmu izveidojis vienkāršu programmu, bet vēlētos to papildināt un lūgt Jūsu palīdzību.

Vai kaut kā varētu klāt pieprogrammēt tā lai, kad laiks ir lielāks par 60 minūtēm tad programma uzrādītu laiku stundās un minutēs, piemēram 100 minūtes '' Braukšanas laiks ir 1h 40 min''

PAti programma :

Izdzēsts, lai kursabiedri nezog zagtu
Last edited by eriksu2 on 15 Feb 2010, 10:33, edited 1 time in total.

User avatar
azazul
Vecākais lietotājs
Atbildes: 706
Pievienojies: 24 Mar 2007, 18:18
Reputācija: 0

Post no azazul » 14 Feb 2010, 15:35

A tu droši zini ka tev vajag aprēķinus veikt ar daļskaitļiem ? (tb tie real nozīmē ka tiek izmantoti daļsaitļi.

Anyway.
Laika to ko tu gribi varētu dabūt ar

Code: Select all

writeln( ( trunc(T) div 60 )  ,  "h ", ( trunc(T) mod 60 ) , "m" );
paskaidrojums:

trunc funkcija paņ em no daļskaitļa veselo daļu.
trunc (3.1415) = 3;

div ir veselo skaitļu dalīšana
7 div 2 = 3
4 div 3 = 1

mod id dalīšanas atlikums
6 mod 2 = 0
7 mod 5 = 2

FireFoxsitis
Reģistrēts lietotājs
Atbildes: 122
Pievienojies: 14 Feb 2009, 14:45
Reputācija: 0

Post no FireFoxsitis » 14 Feb 2010, 15:42

Removed by FireFoxsitis. Copyright 2010. FireFoxsitis.
Last edited by FireFoxsitis on 25 Feb 2010, 21:58, edited 1 time in total.
Removed by FireFoxsitis. Copyright 2010. FireFoxsitis.

User avatar
richX
Reģistrēts lietotājs
Atbildes: 299
Pievienojies: 15 Mai 2009, 18:05
Reputācija: 0

Post no richX » 14 Feb 2010, 16:23

FireFoxsitis, a tev labāk reizumis paklusēt, ja no tā nav nekādas sajēgas, autors uzdeva konkrētu jautājumu, un sākumā jau pabrīdināja, ka pascal sācis mācīties nesen, kur te būtu problēma? Labāk lai cilvēks mācās, uzdod jautājumus un tālāk mācās, nevis vienkārši sēž pie PC draugos un kasa olas...
Last edited by richX on 14 Feb 2010, 16:36, edited 1 time in total.

User avatar
daGrevis
Vecākais lietotājs
Atbildes: 2343
Pievienojies: 06 Feb 2009, 19:00
Reputācija: 0
Atrodas: Rīga, Latvija

Post no daGrevis » 14 Feb 2010, 16:29

FireFoxsitits?? :D
Think of how stupid the average person is, and realize half of them are stupider than that. /George Carlin/

http://twitter.com/#!/daGrevis
http://last.fm/user/daGrevis
http://ask.fm/daGrevis

http://dagrevis.lv/

eriksu2
Reģistrēts lietotājs
Atbildes: 130
Pievienojies: 12 Okt 2009, 19:58
Reputācija: 0

Post no eriksu2 » 14 Feb 2010, 17:50

To Azazul: liels paldies =), domāju tas būs daudz grūtāk bet nav nemaz tik gara rinda

To Firefoxitis: Nu ja man skolā nevajadzētu sākt programmēt ta dizvai es sāktu ;)

User avatar
izredzētais
Reģistrēts lietotājs
Atbildes: 1730
Pievienojies: 22 Dec 2007, 12:22
Reputācija: 0

Post no izredzētais » 14 Feb 2010, 18:05

eriksu2, neņ em pierē, jamajam 11 gadi

User avatar
azazul
Vecākais lietotājs
Atbildes: 706
Pievienojies: 24 Mar 2007, 18:18
Reputācija: 0

Post no azazul » 14 Feb 2010, 18:26

eriksu2, iesaku tev 'paspēlēties' ar mod operātoru,
jo atlikuma atrašana ir viena no noderīgākajām operācijām kodējot.

Pievienot atbildi

Return to “Cita programmatūra ”