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

Question

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a,b: integer; c: real; begin writeln ('Введите 1 число'); read (a); writeln ('Введите 2 число'); read (b); c:=(a/1)/(1/b); writeln (c); end.