evo nece mi najjednostavniji program pokrenuti!!!
program prvi;
var x:integer;
begin
readln (x);
writeln ('duplo veci broj je',2*x);
readln
end.

jel moze neko kod sebe probati