Решить задачу на PASCAL Дано число x. Если x больше 5, то надо умножить x на 2. Результат вывести на экран.

Program z5; Var x:integer;Begin write('Введите число - '); readln(x); if (x > 5) then write(x*2) else write(x);End.

Program z5;

Var x:integer;

Begin

write('Введите число - '); readln(x);

if (x > 5) then write(x*2)  

else write(x);

End.

write('Введите число - '); readln(x);

if (x > 5) then write(x*2)  

else write(x);