system "clear" print " " print " " print "============================================================" print " Os direitos do autor e a GPL " print "============================================================" print " " print "Este programa é distribuido sob GPL. " print "Se você não souber o que é a GPL, envie um e-mail ao autor " print " tarcisio@member.ams.org " print "mas em suma quer dizer que você pode usar livremente o sistema" print "de programas aqui mencionados, desde que esta informação seja mantida" print "em todas as alterações que você fizer dos programas e das cópias que " print "você deles fizer - é a proteção do direito autoral que não lhe impede" print "de usar livremente o conhecimento mas que mantém na memória quem " print "participou de sua produção." print "Este programa foi escrito por Tarcisio Praciano-Pereira " print "professor da Universidade Estadual Vale do Acaraú - UeVA " print "Laboratório de Matemática Computacional - Curso de Matemática " print "Sobral - Ceará - Brasil " print "Aperte enter para continuar!" pause -2 system "clear" print "definindo os pontos da tabela " print "x1 = -7; y1 =-10.0; d1 =-70.65;" print "x2 = -3; y2 =13.0; d2 = 2.5;" print "x3 = 0; y3 =0.0; d3 =-0.533; " print "x4 = 2; y4 =17.0; d4 = 0;" print "x5 = 7; y5 =-6.0; d5 =0;" print "Aperte enter para continuar!" pause -2 x1 = -7; y1 =-10.0; d1 =-70.65; x2 = -3; y2 =13.0; d2 = 2.5; x3 = 0; y3 =0.0; d3 =-0.533; x4 = 2; y4 =17.0; d4 = 0; x5 = 7; y5 = -6.0; d5 = 0; print "calculando os coeficientes angulares dos segmentos de reta " print "m1 = (y2 - y1)/(x2 - x1);" print "m2 = (y3 - y2)/(x3 - x2);" print "m3 = (y4 - y3)/(x4 - x3);" print "m4 = (y5 - y4)/(x5 - x4);" m1 = (y2 - y1)/(x2 - x1); m2 = (y3 - y2)/(x3 - x2); m3 = (y4 - y3)/(x4 - x3); m4 = (y5 - y4)/(x5 - x4); print "Aperte enter para continuar" pause -2 print "Definindo as funções do primeiro grau da interpolação linear" print "f1(x) = y1 + m1*(x - x1)" print "f2(x) = y2 + m2*(x - x2)" print "f3(x) = y3 + m3*(x - x3)" print "f4(x) = y4 + m4*(x - x4)" f1(x) = y1 + m1*(x - x1) f2(x) = y2 + m2*(x - x2) f3(x) = y3 + m3*(x - x3) f4(x) = y4 + m4*(x - x4) print "Definição da interpolação linear " print "é uma função do primeiro grau, por pedaços, cuja definição " print "se altera para cada um dos intervalos da malha. " print "Estou usando cond?comando:outro_comando que é a forma comprimida" print "do if/else típico da linguagem C - gnuplot usa a sintaxe do C." print "f(x)=(x