Введите два любых числа и найдите их произведение,используя только операцию сложения.
Введите два любых числа и найдите их произведение,используя только операцию сложения.
Ответ(ы) на вопрос:
var
s,i,b,a:integer;
begin
Writeln('Введите два целых числа');
readln(a,b);
s:=0;
for i:=1 to b do s:=s+a;
writeln(s);
end.
Не нашли ответ?
Похожие вопросы