Подвоєння

Pascal Ввід-вивід

readln / writeln

Блок-схема за ДСТУ

program Double;
var x: integer;
begin
  readln(x);
  writeln(x * 2);
end.