Вычислить произведение 2-ух натуральных чисел используя лишь операцию…

Я, в основном, программы на С + пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).Program A1; var a,b,c,i: integer; beginwrite ('Enter the a: '); read (a); writeln ('Enter the b: '); read (b); с: =0; for i: =1 to a Do c: =c+b; writeln ('a*b=',c: 5:0); end. Объясняю (начинаю сразу с цикла for): что значит произведение двух натуральных чисел а и b — это означает, сложить b с самим собой по а раз (можно и наоборот). Например, a=5, b=3. Переменную с=0 будем складывать с b.i=1 c=5+0; i=2 c=5+5; i=3 c=10+5; //c=15Вот и есть ответ: 5*3=15.