Tire a entrada do console em Pascal
Program InputInPascal;
Var
number:integer;
begin
write('Enter a number: ');
readln(number); // Waiting for input and storing it inside variable "number"
writeln('The double of the number entered is: ',number*2);
End.
ALeonidou