Напишите программу для решения уравнения: y=3z - 2
Var y,z:integer; begin Readln(z); y:=3*z-2; Writeln(y); End.