Можно использовать все эти команды:
Найдут тебя опять за дымкою тум<u>ано</u>й -<u />> <span>Найдут тебя опять за дымкою тум<u>анно</u>й
</span>Найдут тебя опять за дымкою тум<u>ан</u>ой -> Найдут тебя опять за дымкою тум<u>анн</u>ой
Найдут тебя опять за дымкою тума<u>ной</u> -> Найдут тебя опять за дымкою тума<u>нной</u>
Найдут тебя опять за дымкою тума<u>но</u>й -> Найдут тебя опять за дымкою тума<u>нно</u>й
Program n1;
const n=15;
var a: array[1..n] of integer;
i: integer;
begin
randomize;
writeln('исходный массив:');
for i:=1 to n do
begin
a[i]:=random(21)-10;
write(a[i],' ');
if a[i]<=3 then a[i]:=sqr(a[i])*a[i];
end;
writeln;
writeln('полученный массив:');
for i:=1 to n do write(a[i],' ');
end.
Второй вариант. Внизу картинка, которая всё подтверждает :)
Решение показано в прилагаемом файле.