Составить программу паскаль нахождения произведения двух натуральных чисел без использования операции умножения.
Составить программу паскаль нахождения произведения двух натуральных чисел без использования операции умножения.
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var
a,b,c:integer;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
repeat
c:=c+1;
until c=a*b;
writeln('Произведение чисел= ',c)
end.
Не нашли ответ?
Похожие вопросы