Question

Можно ли составить алгоритм так,чтобы можно было решить задачу при любом значении x?задача:у Вити было 7 рублей. Он решил купить карандаш за x рублей. Сколько денег у него останется или сколько не хватит?

Answer 1

Var x:real;
begin 
readln(x);
if x>7 then writeln(x-7) //выводится сколько не хватило.
else
writeln(7-x); //выводится сколько осталось.
readln;
end.