From 806dd4ff649a1fb9a28dc469cc17d7dd5dbc1da5 Mon Sep 17 00:00:00 2001 From: pacien Date: Fri, 23 Feb 2018 01:11:34 +0100 Subject: Adapt for new grammar --- res/instr.tpc | 28 ---------------------------- 1 file changed, 28 deletions(-) delete mode 100644 res/instr.tpc (limited to 'res/instr.tpc') diff --git a/res/instr.tpc b/res/instr.tpc deleted file mode 100644 index 7153ac2..0000000 --- a/res/instr.tpc +++ /dev/null @@ -1,28 +0,0 @@ -/* instr.tpc */ -/* int trinome(float a, float b, float c) ; - double valeur(double a, double b, double c, double x) ; */ -/* Résolution d'une équation du deuxième degré */ - b=-1; - while (b<=1) { - c=-1; - while (c<=1) { - print(b, c); - if (trinome(1,b,c)) { - print(r1, r2); - print(valeur(1,b,c,r1),valeur(1,b,c,r2)); - } - c=c+1; - } - b=b+1; - } - return 0; - d=b*b-4*a*c; - if (d>=0) { - s=sqrt(d); - r1=(-b+s)/(2*a); - r2=(-b-s)/(2*a); - return 1; - } - return 0; - if (0<=r1 && r1<=max && 0>=r2 && r2>=-max) - return; \ No newline at end of file -- cgit v1.2.3