var z:real;
BEGIN
readln(z);
writeln((16+y)*2);
END.
Объяснение:
Надеюсь этот язык программирования в скором времени умрет.
program <название>;
Begin
Writeln ("((16+y)*2")
end.
