PascalABC.NET
Дан массив из 20 целых чисел,все элементы меньше 10 заменить на 1, и вывести получившиеся массив на экран. Заполнение массива с клавиатуры.

Занесите программу в окно ввода, подведите курсор к непонятному слову - она все покажет

То есть вы мне дали ответ из окна вывода? Впервые так. Всегда писали целую программу от program до end. Разве не логично, что ответ вроде как присылают программой, а не результатом из окна вывода? Но вписать ваше написанное в окно вывода не получается, даже в английской раскладке.

Ох... беда-беда

Приложил скрин

Хм, значит это не в окне вывода. Забейте, ладно.

PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ReadArrInteger(20);

 a.Transform(t -> t < 10 ? 1 : t);

 a.Println

end.