Найдите значение переменной z после выполнения данных фрагментов программы

Я, в основном, программы на С++ пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).

Program A1;

var a,b,c,i:integer;

begin

write('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.

Бе́лый гриб, или боровик — гриб из рода Боровик.Белый гриб широко распространён на всех материках, кроме Австралии.Сезон: в северном умеренном климате — с середины июня по конец сентября, наиболее массовый сбор — во второй половине августа. Часто кратковременно появляется в конце мая, в более тёплых регионах плодоносит и в октябре.Съедобный гриб, в странах Восточной Европы считается одним из лучших грибов по вкусовым качествам, в народе его часто причисляют к так называемым «благородным грибам» и именуют «царём грибов»