Задуманно число Х. Если оно больше 10, то прибавить к нему

Пусть X данное целое число. Тогда программка на языке программирования Pascal ABC может смотреться так:

program zadacha1;

uses crt;

var X: integer;

begin

writeln (vvedite chislo X:);

read(X); Ввод значения числа X во время исполнения программки

if Xgt;10 then X:=X+2 else X:=X*2;

writeln (X=, X) Вывод результата на экран

end.

Либо же второй метод решения задачки:

program zadacha2;

uses crt;

var X: integer;

begin

X:=5;

if Xgt;10 then X:=X+2 else X:=X*2;

writeln (X=, X) Вывод результата на экран

end.

Значение величины X можно изменять как в первой программке, так и во 2-ой.