Matematické Fórum

Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.

Nástěnka
22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.

Nejste přihlášen(a). Přihlásit

#1 09. 01. 2011 00:11

Pájka
Zelenáč
Příspěvky: 14
Reputace:   
 

A zase ten maple:-(

Asi vás z mého řešení příkladu budou omývat, ale potřebuju zase pomoct..:-( Po půl dne snažení se na vás tedy zase obracím se zadáním: 
Napište proceduru, která vráti součet času. Např. 5.03 , 4.59 , znamená 5 minut a 3 sekundy, 4 minuty a 59 sekund. Výsledný čas nemá být 9 minut a 62 sekund, ale má být 10 minut a 2 sekundy.

Moje řešení:
sl:=proc(a,b):
>a:=[x,y];
> b:=[z,u];
> c:=[g,h];
> g:=x+z;
> h:=y+u;
> if h<60 then g:=x+z;h:=y+u;end if;
> if h>59 then g:=x+z+floor(h/60);h:=(y+u)/60-floor ((y+u)/60);end if;
> h=(d*60)+e;
>end proc;
a:=[15,32];
b:=[3,41];                         
> sl(a,b);

Děkuji všem za pomoc.

Offline

  • (téma jako vyřešené označil(a) Pájka)

#2 09. 01. 2011 16:38

Pájka
Zelenáč
Příspěvky: 14
Reputace:   
 

Re: A zase ten maple:-(

Zkoušela jsem vymyslet jiné řešení, zase nevyšlo, tentokrát jsem zkoušela řešit jako vektory,tak jestli někdo náhodou ví, jak to spravit...


>with(linalg)
> a:=vector([x,y]);
> b:=vector([z,u]);                   
> soucet:=a+b;
> evalm(soucet);
> e:=(x+z);
> f:=(y+u);
> sl:=proc(a,b):
> (y+u)/60=(60*i)+w;
> if ((y+u)>60)= ((y+u)>60) then e:=e+i;f:=w;
> end if;
> end proc;

soucet:=a+b;
                           soucet := a + b

> a:=vector([15,38]);

                            a := [15, 38]

> b:=vector([13,42]);
                            b := [13, 42]

> evalm(soucet);
                               [28, 80]
> vector([28, 80]);
                               [28, 80]

> sl(a,b);

                                  w

Offline

 

#3 16. 01. 2011 21:10 — Editoval gladiator01 (16. 01. 2011 21:19)

gladiator01
Místo: Jindřichův Hradec
Příspěvky: 1587
Škola: ZČU FAV - SWI
Pozice: absolvent
Reputace:   53 
Web
 

Re: A zase ten maple:-(

↑ Pájka:
Půl dne snažení nic není a někdy když něco nejde, tak je lepší to nechat být a vráti se k tomu později.
Mohu se zeptat kolik těch příkladů bylo? Jestli jsem ti tu nevyřešila celou práci. A zkouška doufám není, protože jestli nevyřešíš tyto jednoduché příklady, tak zkoušku by jsi určitě neudělala.

Code:

sl := proc (a, b);
local h, m, pom, k; 

k := 0; 
h := a[1]+b[1]; #hodiny
m := a[2]+b[2]; #minuty

if m>=60 then  #když m je větší než 60
    pom := m; #pom=minuty
    while 60 < pom do #dokud jsou minuty >= 60
         pom := pom-60; #odčítáme od 60 a zároveň 
         k := k+1            #počítáme kolikrát
    end do; 
    h := h+k;                #kolik šedesátek jsem spočítali, tolik připočteme k hodinám
    m := pom                #do minut vložíme hodnotu pom
end if; 
printf("vysledek: %g.%g", h, m) 

end proc; 
a := [5, 3]; 
b := [4, 59]; 
sl(a, b);

Jestli už ti to je k ničemu, tak promiň ale dřív jsem nemohla mám také zkouškové.


Naděje jako svíce jas, potěší srdce štvané, čím temnější je noční čas, tím zářivěji plane.
VIVERE - MILITARE EST (Seneca)
Vím, že nic nevím. - Sokrates

Offline

 

#4 18. 01. 2011 10:50

Pájka
Zelenáč
Příspěvky: 14
Reputace:   
 

Re: A zase ten maple:-(

↑ gladiator01:
"Nemohla"? Ty jsi holka? Hm, tak to jsi dobrá, když tohle umíš:-)
Stihla jsi to, ještě jsem ten zápočet nedělala.
To jsou jenom cvičné příklady, žádná práce na zápočet nebo tak, příklady u zápočtu jsou jiné, tyto vyřešené mi slouží jako učební materiál. Moc děkuji, že se to zase povedlo, už jsem nedoufala..:-)
No všechny to určitě nejsu, ještě tam mám nějaké, na matice, ale to už asi čert vem...

Tak moc děkuju!!!

Offline

 

Zápatí

Powered by PunBB
© Copyright 2002–2005 Rickard Andersson