Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  cc
Language: PASCAL
Code:
program quaylennaolaquaylennao; 
uses crt;
var b,c:real;
begin          
   writeln('hay nhap so b va c');
   read(b,c);
   if b=0 then
      if c=0 then writeln('pt vo so nghiem')
         else writeln('pt vo nghiem')
   else writeln('pt co 1 nghiem',c/b:4:2);
   delay(5000);
   readln
end.
          
          
          
          
          
Comments: