Doppio di un numero

di

doppioDato un certo numero intero x calcolare il suo doppio.

Esempi

Istanza Elaborazione Risposta
1 x=1 x = 2*x 2
2 x=2 x = 2*x 4

Codice

Program Doppio;
Var
   x: Integer;
Begin
   Readln(x);
   x:=2*x;
   Writeln(x);

   ReadLn;
End.