Δημοσιεύτηκε: 01 Σεπ 2010, 22:10
λοιπόν βάζω αυτό αλλά μου βγάζει λάθος για illegal qualifier στη δύναμη....
- Κώδικας: Επιλογή όλων
program eksiswsh(input,output);
var a,b,c,d:integer;
begin;
writeln('dwse ton a');
readln(a);
writeln('dwse ton b');
readln(b);
writeln('dwse ton c');
readln(c);
d:=b*b-4*a*c;
writeln('oi rizes tis eksiswshs einai ' , d^1/2/2*a+b/2 , ' h ' , b/2-d^1/2/2*a+b/2,);
end.