Написать программу вычисления арифметического выражения 5*х+Х*5/5+Х
Var x:integer; begin readln(x); writeln(5*x+5*x/5+x); end.