алг
нач
цел количество, i
вывод "Укажите количество: "
ввод количество
целтаб а[1:количество]
нц для i от 1 до количество
если mod(i,2)=0 то а[i]:=i**2 иначе а[i]:=0 все
вывод цел_в_лит(а[i])+" "
кц
кон
Тестовое решение:
>> 01:50:19 - Новая программа* - Выполнение начато
Укажите количество: 10
0 4 0 16 0 36 0 64 0 100
>> 01:50:23 - Новая программа* - Выполнение завершено