Напишите программу которая получает два целых числа и находит их произведение не используя операцию умножения. учтите что числа могут быть отрицательными.На Turbo Pascal пожалуйста срочно!!!!!Зарвнее спасибо!

Вот. Умножение без помощи операции умножения. Делай лучшим)program pr;var i,a,b:integer;p:real;beginwrite(Первый множитель: );readln(a);write(Второй множитель: );readln(b);if b<0 then beginb:=-b;for i:=1 to b do beginp:=p+a;end;writeln(-p:0:2);endelse beginfor i:=1 to b do p:=p+a;writeln(p:0:2)end;end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.