esex4

confronto tra programma in turbo pascal 7 e gnuplot

 

program esex4;
uses crt;
var a,b,c:integer;
    d,e,f:real;
begin
clrscr;
a:=-5;
d:=10.56;
writeln('assoluto=',abs(a));
writeln('intero=',int(d));
writeln('arrotondato=',trunc(d));
writeln(sqrt(100));
writeln(exp(3));
writeln(ln(100));
writeln(sin(30));
writeln(cos(30));
writeln(arctan(1));
readln;
end.

 


copiare e incollare parte selezionata;modificare;incollare su gnuplot>
(per sostituire rapidamente := con = e writeln con print,parentesi()
possibile usare Modifica-Sostituisci..)
a=-5;
d=10.56;
print'assoluto=',abs(a);
print'intero=',int(d);
print'arrotondato=',ceil(d);
print sqrt(100);
print exp(3);
print log(100);
print sin(30);
print cos(30);
print atan(1);
pause -1;

oppure copiare parte modificata e incollare su notes:salvare come esex4.txt
richiamare da gnuplot> con open esex4.txt

 

# esex4.txt 
a=-5;
d=10.56;
print'assoluto=',abs(a);
print'intero=',int(d);
print'arrotondato=',ceil(d);
print sqrt(100);
print exp(3);
print log(100);
print sin(30);
print cos(30);
print atan(1);
pause -1;