← All examples Doubling Pascal Input/Output readln / writeln Flowchart (ISO 5807) StartInput xOutput x * 2EndFigure 1 — Double Source code program Double; var x: integer; begin readln(x); writeln(x * 2); end. Open in the editor