Составить алгоритм и программу вычисления выражения X=C2+A

Program zadacha; var x,c,a:integer; begin writeln('Введите числа С и А'); readln(c,a); x:=(c*2)+a; writeln('Число Х= ',x); end.

Алгоритм: 1. Получить значение С и А. 2. Значение С, необходимо умножить на два. 3. Прибавить к значению А результат получившийся во 2 шаге.  4. Вывести результат.  Программа: program example; var C:integer; // переменная С A:integer; // переменная А X:integer; // переменная Х begin write("Введите переменную С: "); // выводим сообщение readln(C); // получаем значение write("Введите переменную A: "); // выводим сообщение readln(A); // получаем значение X:=C*2;  X:=A+X; write("X= ", X); // выводим сообщение end.