Из элементов с четными индексами вычесть второй элемент.(паскаль) помогите решить задачу

Ответы:

Вася Макогон

26-02-2019 13:44

Const n = 10; Var i : Integer; m : array[1..n] of Integer; Begin For i:=1 to n do Readln(m[i]); For i:=n div 2 downto 1 m[i*2]:=m[i*2]-m[2]; For i:=1 to n do Writeln(i,,m[i]); end.

Также наши пользователи интересуются:

Для чего нужно знать анатомию Ширина прямоугольника на 6 см меньше длинны, а площадь равна 40см^2. Найдите стороны прямоугольника

Картинка с текстом вопроса от пользователя Тарас Алымов

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Из элементов с четными индексами вычесть второй элемент.(паскаль) помогите решить задачу » от пользователя Тарас Алымов в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!