Напишите программу, которая получает два целых числа и находит их произведение, не...

Question

Напишите программу, которая получает два целых числа и находит их произведение, не используя операцию умножения. Учтите, что числа могут быть
отрицательными. Через цикл WHILE!!!!

Comments

на каком языке?

---

программирования

---

ок, так на каком языке программирования вам нужна программа?

---

по видимому паскаль?

---

да

Answer 1

Var a,b,c:integer;
begin
writeln('введите два числа');
readln(a,b);
c:=0;
while a<>0 do begin
c:=c+b;
a:=a-1;
end; writeln('ответ : ',c);
end.