| |
ON6OA > TECHNI 09.07.03 19:40l 59 Lines 2185 Bytes #999 (0) @ EU
BID : 29445_ON0CK
Read: DF7ML GUEST OE7FMI
Subj: RE: Physik-Olympiade
Path: DB0ZKA<DB0GPP<DB0LX<DB0RBS<DB0SWR<DB0HBN<DB0SON<DB0ERF<DB0ROF<DB0ACH<
DB0LJ<LX0HST<HA3PG<HA8FY<ON0CK
Sent: 030627/2117Z @:ON0CK.WVL.BEL.EU #:29445 [Kortrijk] FBB7.00g $:29445_ON0CK
From: ON6OA@ON0CK.WVL.BEL.EU
To : TECHNI@EU
DK2ZA Schrieb:
Hallo Techniker!
In der ersten Runde der 35. Internationalen Physik-Olympiade, welche
gerade begonnen hat, faellt eine der vier Aufgaben in unser Fachgebiet:
An eine Batterie mit Innenwiderstand 1 Ohm und unbekannter Spannung
wird zuerst ein 9-Ohm-Widerstand angeschlossen und danach parallel
zu diesem ein weiterer unbekannter Widerstand geschaltet.
Es zeigt sich, dass in beiden Faellen die ausserhalb der Batterie
erbrachte Leistung gleich gross ist.
Wie gross ist der unbekannte Widerstand?
Vielleicht findet sich jemand, der eine verstaendlich durchgerechnete
Loesung hier in die Rubrik stellt?
Helmut (DK2ZA) hat hier ein schoenes Problem dargestellt....ich konnte nicht
nachlassen ein kleines Program zu schreiben womit alle loesungen und auch die Logik der Sache ausgesucht werden koennen. Die volgende SOURCE einfach ausfuehren lassen.
73 De ON6OA André Pittem West Flandern Belgien.
------------------------------------------------------------------------------------------
PHYSIK.BAS
1 CLS : PRINT : PRINT : PRINT
2 PRINT ; " ****** PHYSIK OLYMPIAD FRAGE ******"
3 PRINT : PRINT ; " METHODE I QUADRAT R IST IN BEIDE FAELLE GLEICH ALSO DARAUS DIE GLEICHUNG"
4 PRINT ; " KONSTRUIEREN UND LOESEN..."
5 PRINT ; " HIER DIE LOESUNGEN IN QBAS GWBAS ODER QUICKBASIC."
6 PRINT : PRINT : PRINT ; " VIEL SPASS!!!!! "
7 PRINT : PRINT : PRINT
10 INPUT ; "Give the inner resistance of DC-source in Ohms(Default 1)"; Ri
20 IF Ri < 0 THEN GOTO 10
30 IF Ri = 0 THEN Ri = 1
40 PRINT : INPUT ; "Value first resistor in Ohms must be>Ri(Default 9)"; Rf
50 IF Rf < 0 THEN GOTO 40
55 IF Rf <= Ri THEN GOTO 40
60 IF Rf = 0 THEN Rf = 9
70 REM INTERMEDIATE VARIABLES
80 Z = Ri ^ 2 / Rf + 2 * Ri + Rf
90 D = (2 * Ri - Z) ^ 2 - Ri ^ 2 * 4
95 IF D < 0 THEN PRINT "RESULTS ARE NOT REAL!": END
100 X1 = (Z - 2 * Ri + D ^ .5) / 2
110 X2 = (Z - 2 * Ri - D ^ .5) / 2
120 Rs = X2 * Rf / (Rf - X2)
200 PRINT : PRINT ; "Ri="; Ri: PRINT ; "Rf="; Rf: PRINT ; "Parallelresistor Rs="; Rs
210 PRINT : PRINT ; "TWO RESULTS OF SECOND DEGREE EQUATION ARE": PRINT ; "X1="; X1: PRINT ; "X2="; X2
220 PRINT
230 END
Read previous mail | Read next mail
| |
