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

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

program zadacha1;

uses crt;

var X: integer;

begin

writeln ('vvedite chislo X:');

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

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

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

end.

Или же второй способ решения задачи:

program zadacha2;

uses crt;

var X: integer;

begin

X:=5;

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

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

end.

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