Alexander Galanin пишет:
On Fri, 04 Dec 2009 17:33:22 +0300
San_Sanych <ssan...@gmail.com> wrote:

#! /usr/bin/tclsh
while (1) {puts [expr [gets stdin]]}

while {[ gets stdin e ] >= 0} {
    puts [ expr $e ]
}

Но такой калькулятор тоже плох, потому что у него 2^2 == 0,
а 5/3 == 1.

увы только так
./calc.tcl

5.0/3
1.6666666666666667
2**2
4


--
Александр Вайтехович
www: http://sanych.nnov.ru
jabber: sanych{a}sanych.nnov.ru


--
To UNSUBSCRIBE, email to debian-russian-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org

Reply via email to