|
3.4.
,
3.4.3.
then else . , :
( ) , else if.
. . 2.4.2 ( 10) .
program n_12;
var a, b, : real;
begin
writeln (' ');
write (' , b>>');
readln (, b) ;
if <>0 then
begin
:=-b/a;
writeln (' =', : 9: 3)
end
else if b<>0 then writeln (' ')
else writeln ('x - ');
end.
, . , , .
program n_13;
var a, b, : real;
begin
writeln (' ');
write (' , b>>');
readln (, b) ;
if <>0 then
begin
x:=-b/a;
writeln (' =', :9:3)
end;
if (=0) and (b<>0) then writeln (' ');
if (a=0) and (b=0) then writeln ('x - ')
end.
, . : .
, [, b].
|