Phuongtrinhbacnhat mot an program phuongtrinh; var a,b : real; begin wirteln('phuong trinhbacnhat co dang ax+b=0'); write('nhap a'); readln(a); write('nhap b'); readln(b); if a<> 0 then write('phuong trinh co nghiem duy nhat x:',(-b/a)); esle {a=0} if b=0 then write('moi gia tri cua x la nghiem phuong trinh'); else { a=0,b khac 0} write('phuong trinh vo nghiem'); readln; end. Tim solonnhat program lonnhat; var a,b,c ,max:integer; begin write('nhap 3 so'); readln(a,b,c); max :=a; if max <b then max :=b; if max <c then max :=c; write('so lonnhat la',max); readln; end. Tim so nho nhat program nhonhat; var a,b,c ,min:integer; begin write('nhap 3 so'); readln(a,b,c); min :=a; if min>b then max :=b; if min>c then max :=c; write('so lonnhat la',max); readln; end. . Phuong trinh bac nhat mot an program phuongtrinh; var a,b : real; begin wirteln(&apos ;phuong trinh bac nhat co dang ax+b=0'); write('nhap. write(&apos ;phuong trinh vo nghiem'); readln; end. Tim so lon nhat program lonnhat; var a,b,c ,max:integer; begin write('nhap 3 so& apos;); readln(a,b,c);