Question

Дано
число а. Не пользуясь никакими другими арифметическими операциями, кроме
сложения, получить: 6а за три операции. Paskal

Answer 1

var
  a: real;

begin
  readln(a);
  a := a + a + a; //$a+a+a=3a$
  a := a + a;       //$3a+3a=6a$
  writeln(a);
end.