Сколько публикации созданного сайта на веб-сервере?

a. 4
b. 5
c. 2
d. 3
e. 7

Не знаю правильно ли но мне кажется А

во-первых хотелось бы узнать, почему у тебя в 24 строчке странная запись:

if (p else f: =false;

здесь непонятно, к чему написана скобка, а также непонятно, куда затерялся синтаксический then.

во-вторых - почему в той же строчке сравниваешь тип real с типом boolean? на это ругается даже компилятор.

в-третьих - если мы опустим эти недочёты и вникнем в алгоритм, то поймём, что ты зациклил условие проверки p на истинность до тех пор, пока i не будет больше n или пока f не станет ложью. но тут подвох в чём? в этом цикле ты не производишь никаких действий над операторами в условии, кроме как присваивание булевой переменной f значение false, чему оно и равно изначально. то есть можно сказать, что у тебя здесь происходит бесконечное зацикливание. скорее всего именно поэтому у тебя не выводится массив, потому что компилятор не в состоянии дойти до строчки вывода. чтобы хотя бы часть условия выполнилась, тебе нужно в условии if..then..else присваивать f не false, а true. но это только в том случае, если ты исправишь конструкцию условия.