tton1.Checked=true) or (radiobutton2.Checked=true) thenClick (SpeedButton1);:=# 0 ;;
8 :( radiobutton1.Checked=true) or (radiobutton2.Checked=true) thenClick (SpeedButton1);:=# 0 ;;
7 :( radiobutton4.Checked=false) thenClick (SpeedButton1);:=# 0 ;;
6 :( radiobutton4.Checked=false) thenClick (SpeedButton1);:=# 0 ;;
5 :( radiobutton4.Checked=false) thenClick (SpeedButton1);:=# 0 ;;
4 :( radiobutton4.Checked=false) thenClick (SpeedButton1);:=# 0 ;;
3 :( radiobutton4.Checked=false) thenClick (SpeedButton1);:=# 0 ;;
2 :( radiobutton4.Checked=false) thenClick (SpeedButton1);:=# 0 ;;
1 : Click (SpeedButton1);:=# 0 ;;
0 : Click (SpeedButton1);:=# 0 ;;
/: Click (SpeedButton1);:=# 0 ;;
* : Click (SpeedButton1);:=# 0 ;;
- : Click (SpeedButton1);:=# 0 ;; + : Click (SpeedButton1);:=# 0 ;;
# 13: Click (SpeedButton1);:=# 0 ;;
# 27: Click (SpeedButton1);:=# 0 ;;
# 44: Click (SpeedButton1);:=# 0 ;;
# 8: Click (SpeedButton1);:=# 0 ;;
# 231: Click (SpeedButton1);:=# 0 ;;
# 244: radioButton1.Checked=true thenClick (SpeedButton1);:=# 0 ;;
# 232: radioButton1.Checked=true thenClick (SpeedButton1);:=# 0 ;;
# 241: radioButton1.Checked=true thenClick (SpeedButton1);:=# 0 ;;
# 226: radioButton1.Checked=true thenClick (SpeedButton1);:=# 0 ;;
# 243: radioButton1.Checked=true thenClick (SpeedButton1);:=# 0 ;;
# 224: radioButton1.Checked=true thenClick (SpeedButton1);:=# 0 ;;
# 40: Click (SpeedButton1);:=# 0 ;;
# 41: Click (SpeedButton1);:=# 0 ;; ;; TForm1.SpeedButton35Click (Sender: TObject);
{if ((skob=true) or (b [t]=) )) then:=true;:=t + 1; [t]:=memo1.Text; x.Text:=rezul2 (t) ;; } (strtofloat (memo1.Text) gt; 0) then.Text:=floattostr (ln (strtofloat (memo1.Text)))
else.Text:= Неприпустиме значення raquo ;;
glob_check:=true ;; TForm1.SpeedButton41Click (Sender: TObject);
{if ((skob=true) or (b [t]=) )) then:=true;:=t + 1; [t]:=memo1.Text;.Text:=Rezul2 (t) ;; } (strtofloat (memo1.Text) gt; 0) then:=strtozr (memo1.Text);:=Log10ZR (zn1) ;. Text:=floattostr(zrtoreal(zn1));.Text:=laquo;Недопустимоезначениеraquo;;_check:=true;;TForm1.SpeedButton48Click(Sender: TObject) ;. Text:=floattostr (pi); _ check:=true ;; TForm1.SpeedButton47Click (Sender: TObject);
{if ((skob=true) or (b [t]=) )) then:=true;:=t + 1; [t]:=memo1.Text;.Text:=Rezul2 (t) ;; } memo1.Text= 0 then memo1.Text:= Деленіенанульзапрешено :=strtozr (memo1.Text);
zn1:=divzr (inttozr (1), zn1) ;. Text:=zr_e (zrtostr (zn1));
end; _check:=true ;; TForm1.SpeedButton57Click (Sender: TObject) ;. Text:= 0 raquo ;; _ check:=true ;; TForm1.RadioButton11Click (Sender: TObject) ;: string;:= laquo ; raquo ;;:=memo1.Text; (length (f) gt; 8) then.Text:= raquo ;; j:=1 to 8 do.Text:=memo1.Text + f [j] ;. MaxLength:=8 ;;; TForm1.RadioButton10Click (Sender: TObject) ;: string;:= raquo ;;:=memo1.Text; (length (f) gt; 16) then.Text:= ; j:=1 to 16 do.Text:=memo1.Text + f [j] ;;; TForm1.RadioButton9Click (Sender: TObject) ;: string;:= raquo ;;:=memo1.Text; (length (f) gt; 32) then.Text:= raquo ;; j:=1 to 32 do.Text:=memo1.Text + f [j] ;;; TForm1.RadioButton8Click (Sender: TObject) ;: string ;:= raquo ;;:=memo1.Text; (length (f) gt; 64) then.Text:= raquo ;; j:=1 to 64 do.Text:=memo1.Text + f [ j] ;;; TForm1.SpeedButton50Click (Sender: TObject) ;: string;
{if ((skob=true) or (b [t]=) )) then:=true;:=t + 1; [t]:=memo1.Text; memo1.Text:=rezul2 (t) ;; }:=strtozr (memo1.Text); inv.Checked=true then (ComparisonZR (zn1, inttozr (0))=- 1) then.Text:= Неприпустиме значення raquo ;;
nev:=true ;;;:=powerzr (zn1, realtozr (0.5));:=RefreshZR (zn1);:=sqrzr (zn1);:=RefreshZR (zn1);
end; .Text:=zr_e (zrtostr (zn1));
glob_check:=true;
{sm:=zrtostr (zn1); j:=1 to length (sm) dosm [j]= Z then sm [j]:= E raquo ;; sm [j]= + then delete (sm, j, 1) ;;. Text:=sm;}; TForm1.SpeedButton46Click (Sender: TObject);
{if ((skob=true) or (b [t]=) )) then:=true;:=t + 1; [t]:=memo1.Text; memo1.Text:=rezul2 (t) ;; }:=strtozr (memo1.Text);:=powerzr (zn1, inttozr (3));
obrazec1:=zrtoreal (zn1) ;. Text:=zr_e (zrtostr (zn1));
glob_check:=true ;; TForm1.SpeedButton10Click (Sender: TObject); meraisch of
: memo1.Text:=DrtoDes (memo1.Text, 2);
8: memo1.Text:=DrtoDes (memo1.Text, 8);
: memo1.Text:=DrtoDes (memo1.Text, 16);
End;:=t + 1; [t]:=memo1.Text; [t]:= m raquo ;; (((b [2] lt; gt; 0 ) and ((b [1] lt; gt; + ) and (b [1] lt; gt; - )) and ((b [t - 1] lt; gt; + ) and (b [t - 1] lt; gt; - ))) and (skob=false)) then.Text:=rezul (t - 1); _ check:=true; meraisch of
: memo1.Text:=DesToDr (memo1.Text, 2);
8: memo1.Text:=DesToDr ...
