k, tmax, n, A0 beolvasott értékei rendre 0,005, 300, 15 és 0,2 legyenek.
1
k, tmax, n, A0 beolvasott értékei rendre 0,005, 300, 15 és 0,2 legyenek. Start Beolvas: k, tmax, n, A0 t=0: dt=tmax/n Akoz=A0: Apont= A0: hiba=0 Kiír: t, Akoz, Apont, hiba t=t+dt Akoz=Euler(Akoz, k,dt) Apont=Expo1(A0,k,t) hiba=100*abs(Akoz-Apont)/Apont Kiír: t, Akoz, Apont, hiba t<tmax? Vége igen nem
description
Start. Beolvas: k, tmax, n, A0. t=0: dt=tmax/n. Akoz=A0: Apont= A0: hiba=0 Kiír: t, Akoz, Apont, hiba. t=t+dt. Akoz=Euler(Akoz, k,dt) Apont=Expo1(A0,k,t) hiba=100*abs(Akoz-Apont)/Apont Kiír: t, Akoz, Apont, hiba. igen. t
Transcript of k, tmax, n, A0 beolvasott értékei rendre 0,005, 300, 15 és 0,2 legyenek.
k, tmax, n, A0 beolvasott értékei rendre 0,005, 300, 15 és 0,2 legyenek.
Start
Beolvas: k, tmax, n, A0
t=0: dt=tmax/n
Akoz=A0: Apont= A0: hiba=0Kiír: t, Akoz, Apont, hiba
t=t+dt
Akoz=Euler(Akoz, k,dt)Apont=Expo1(A0,k,t)
hiba=100*abs(Akoz-Apont)/ApontKiír: t, Akoz, Apont, hiba
t<tmax?
Vége
igen
nem