Re: TI-M: Even Square

[Prev][Next][Index][Thread]

Re: TI-M: Even Square


With the minor correction (maybe you forgot /2) it works.

Input A
While fpart(Sqrt(A)/2)=/=0 (not 0)
A+1->A
End
Disp A

----- Original Message -----
From: "Víctor Manuel Ropero Martín" <victor-manuel@ctv.es>
To: <ti-math@lists.ticalc.org>
Sent: Thursday, May 25, 2000 5:12 AM
Subject: Re: TI-M: Even Square


>
> This is a good way to get the even square of a:
>
> Input A
> While fpart(Sqrt(A))=/=0 (not 0)
> A+1->A
> End
> Disp A
>
>
>
Follow-Ups: References: