Написать программу которая получает два целых числа и находит их произведение не используя операцию умножения учтите что числа могут быть отриц
Написать программу которая получает два целых числа и находит их произведение не используя операцию умножения учтите что числа могут быть отриц
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы