Практикуемся в использовании цикла for

Прочтите внимательно pdf-файл, прикреплённый к заданию. Особое внимание уделите описанным в нём примерам использования цикла for. Среди них разобрано и последнее задание, которое Вы решали на занятии. Не закрывайте файл во время работы, заглядывайте в него. Старайтесь оформить программу так, как в примерах.

Вам предстоит решить следующую задачу:

Требуется умножить целое число a на целое число b, НЕ используя операции умножения.

Для решения этой задачи заменим умножение сложением, то есть, число a добавим в цикле к произведению b раз. (Например, чтобы умножить 5 на 3, нужно 3 раза сложить число 5).
Не забудьте до цикла в переменную p (произведение) занести начальное значение 0.

Напомню, когда вводите что-то с клавиатуры, используйте не только readln для ввода, но перед этим с укажите пользователю, что надо ввести, чтобы он знал, что программа от него ждёт.
Ещё напомню. Если в цикле for только одно действие, то begin и end не обязательны.

Ниже приведён шаблон программы. Скопируйте его и замените многоточия требуемыми действиями. При этом следуйте подсказкам, данным в комментариях. Оформляйте программу в соответствии с примерами в файле, используйте отступы. Преподавателю отправьте копию экрана, в которой видны и сама программа и результат её работы. Сохраните у себя программу на случай, если потребуется внести исправления.

program ... //Программа поиска произведения 2-х чисел
var
... //Здесь опишите используемые переменные ввести два числа, a и b (множимое и множитель).
...
...
//Задаём начальное значение переменной p
...
//Цикл for осчитывает b раз
for i ...
//в этом цикле - одно действие, - добавление к произведению множимого (a)
...
//После цикла сообщаем, чему равно произведение
...
end.