beta :=2; write (beta,3); writeln; readln(gamma); writeln(gamma); alpha := 2 + beta * gamma; writeln(alpha); if beta = 2 then beta := beta + gamma * alpha + alpha; writeln(beta); end if;