Паскаль, ! ввести с клавиатуры массив из 12 элементов.переставить - вопрос №29450812 от melnushyk099 22.11.2021 18:19

Question

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

melnushyk099 · 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. ...