Составить блок схему и написать программу для решения уравнения z=3y-42, где y – вводится с клавиатуры

program psck;

var

y, z : integer;

begin

read(y);
z:=3*y-42;
write('3 * ',y,' - 42 = ',z);

end.

спасибо!