Дано число n (вводиться с клавиатуры). Если это число больше 10, то увеличить его в 2 раза иначе уменьшить на 5 на pascal abc
Program user; uses crt; var a, b: real; begin writeln('введи число с клавиатуры'); readln(a); If a>10 then b:=a*2 else b:=a-5; end.