Помогите спасите даю 15 бал a := 100;
b := 20;
x := b;
if a<x
then x := x-b
else if x<a
then x := x-a
else x := x-b;
writeln (x);
b := 20;
x := b;
if a<x
then x := x-b
else if x<a
then x := x-a
else x := x-b;
writeln (x);
More Questions From This User See All