Увеличить значение переменной С в двое не используя операции умножения

Question

Увеличить значение переменной С в двое не используя операции умножения

Answer 1

Var c:integer;
begin
write('Введите с: ');
readln(c);
c:=c+c;
writeln('c = ',c);
end.

Пример:
Введите с: 16
c = 32

Answer 2

с+с вот просто же если не правильно то  не обижайся пж