Az Eszterházy Károly Tanárképző Főiskola Tudományos Közleményei. 1991. (Acta Academiae Paedagogicae Agriensis : Nova series ; Tom. 20)

Gaál István: A számítástechnika alkalmazása az általános iskolai kémiaoktatásban

1270 TEXT ! 70,

115,"ÜVEGLAP", !, ! .8 1280 FORI= 1 TO 1000:NEXTI 1290 LINE120,120,150,120,1 1300 TEXT 170,1

35,"SZUKSEGES ANYAGOK" 1,1,8 1310 LINE170,145,320,145,1 1

320 TEXT 1

70,155,"TOMEN Y SOSA V".l

, 1,8 1330 FORI= 1 TO 1000:NEXTI 1340 LINE40.60,60,60,1 1350 PAINT45,65,1 1360 FORI=

1 TO 1000:NEXTI 1370 TEXT 170,175,"KALIUMPERMANGANAT", 1,1

,8 1380 LINE32,140,68,140,1 1390 PAINT45,145,1 1400 LINE48,80,52,80,0 14I0FORK=lTO5 1420 READXI.YI 1430 READXK,YK,XV,YV 1440 LINEXK,YK,XV,YV,0 1

450 CIRCLEXI.YI,

2,2.1 1460 NEXTK 1470 FOR 1=1 TO 15 1

480 READXI.YI,XV,YV.XL.YL 1490LINEX!,YI,XV,YV,0 1500CIRCLEXL,YL,3,3,1 1510NEXTI 1520 F0RI=1T05 1530 READA.B 1540 CIRCLEA,B,2,2,0 1550NEXT1 1560 GETV$:IFV$=""TIIEN GOTO 1560 1570 IFV$='T" TUEN 1580 1580 IHRES 8,6 1590 GOSUB1880 1600 CI RCLE 140,80,10,10.1 I610CIRCLE 140,80,8,8,1 1620 FOR 1=1 T04