Question

Только 3.************

Answer 1

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 ReadArrInteger(6).Select((v, i)-> v * (i + 1)).Println(',')

end.

Пример

24 -13 31 7 0 -391

24,-26,93,28,0,-2346

Answer 2

Но я знаю многие школы, где уже семиклассники пишут именно вот так. Так что еще раз, какой класс - это не важно.

Answer 3

И потом, почему Вы решили, что в одну строчку написать решение - это сложнее, чем в пять или десять? )))

Answer 4

я не спорю, но за такое решение нас пошлют далеко.

Answer 5

Ну это Ваши сложности, не так ли? Если у Вас конкретные требования к диалекту языка или набору используемых в нем средств - указывайте это в вопросе.

Answer 6

Например, "Решить в Turbo Pascal / Free Pascal используя цикл for"