/* (c) 1999-2005, Rony G. Flatscher, Wirtschaftsuniversitaet Wien, Austria Europe
   A *possible* solution to excercise # 02
*/

DO Fahrenheit=0 TO 100 BY 4
   Celsius = (Fahrenheit-32)*(5/9)
   SAY FORMAT(Fahrenheit, 3, 0) "øF" "=" FORMAT(Celsius, 3, 2) "øC"
END