Даны два натуральных числа n и k. вычислите произведение n * k, используя лишь операцию сложения.

var n,k,x,i: integer;

begin

readln(n,k);

for i: =1 to k do x: =x+n;

writeln(x);

end.

program p;

var s,a,b,c: string; begins: =' фигуры'; writeln('введите названия трёх фигур'); read(a,b,c); writeln(s,': ',a,', ',b,' и ',c); end.