Задание

4. Запишите зна­че­ние переменной y , по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

Var y,i: integer;

Begin

y := 0;

For i := 1 to 5 do

y := y + 4*i;

Writeln(y);

End.