ECUACI.BAS[[f]я 2Щ0:Ъ7:з6:ы:ф23658j\,8 н160 /х¬0,3;" 1990 ALEASOFT 1990 " (>хЮ1;¬0,0;"________________________________" 2 х¬3,2;;"AX’+BX+C=0" <{х¬5,0;" -B+";В8;Ю1;"_";"V“(B’-4AC)";¬6,0;" X=•••••••••••••••";¬7,8;"2A" F*х¬9 ,5;"INTRODUCE ~A~,~B~,~C~" Pо"A:";A,"B:";B,"C:";C Z,х¬10 ,15; "A:";A;" B:";B;" C:";C d=сX1=(0-B+(»((ЅB^2)+(-4*A*C))))/(2*A) n=сX2=(0-B-(»((ЅB^2)+(-4*A*C))))/(2*A) x%х¬12,0;"Xђ=";X1'"X‘=";X2 ‚+н150–:т0:н140Њ:ы:м30 ЊҐх"SI EL RESULTADO ES DECIMAL Y LE INTERESA SAVER EL RESULTADO EN FRACIONES APUNTE EL RESULTADO Y CARGE EL PROGRAMA SIGUIENTE DE ESTA CINTA.":н150–:т0:ю –6х#0;¬0,1;" PULSE UNA TECLA":ю %е170Є:лA=А"A"МА"G":гB:фA,B:уA:ю Єњд0,0,0,8,24,40(,8,62>,0,0,0,480,72H,8,16,124|,480,72H,8,16,124|,0,0,0,255я,0,0,0,0,0,0,0,0,0,0,24,24,0,0,0,0,0,0,0,255я,0,0,0,0 “