The function is given by the formula y = (x-1) compose a program to calculate it.

Var x, y: int / declare variables
Begin
Writeln (‘enter x:’); / enter x
Read x; / read x
Y: = x-1; / calculate y
Writeln (‘y =’, y); / output from
End.



One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.