kasus workshop 4.3

>>algoritma : Persamaan_kuadrat
{menghitung akar-akar persamaan kuadrat Ax^2+Bx+C=0)
>>deklarasi :
A,B,C = int (koefisien-koefisien persamaan)
disk = longint (nilai diskriminan)
x1,x2 = real (nilai-nilai akar untuk disk>=0)

>>deskripsi :
read(A,B,C)
disk <= B*B-4*A*C
if(A=0) then write(bukan persamaan kuadrat')
else if disk>0 then
x1(-b+ sqrt(disk)/2*A
x2(-B -sqrt(disk)/2*A
else if disk=0 then

berikut ini dengan progam raptor :

 dan ini dengan progam C++ :