Паскаль, ! ввести с клавиатуры массив из 12 элементов.переставить - вопрос №12293831 от dvladimirov425 14.09.2022 12:12

Question

Информатика: Паскаль, ! ввести с клавиатуры массив из 12 элементов.переставить первый и последний элемент. третий заменить на восьмой

dvladimirov425 · Answer

const n=12  var a:array [1..n] of integer; i,k:integer; begin for i:=1 to n do readln(a[i]); k:=a[1]; a[1]:=a[n]; a[n]:=k; a[3]:=a[8]; for i:=1 to n do write (a[i], ); readln; end. ...