Написать программу которая получает два целых числа и находит их произведение не используя операцию умножения учтите что числа могут быть отриц

1
Комментарий удален
Комментарий удален
Комментарий удален

Ответы и объяснения

Лучший Ответ!
2014-01-29T22:34:19+00:00
Program chik;
var a,b,i,s:integer;
begin
readln(a,b);
s:=0;
if(a<0)and(b<0)then begin
for i:=1 to abs(b) do
s:=s+abs(a);
writeln(s);
exit;
end;
for i:=1 to abs(b)do
s:=s+a;
writeln(s);
end.