НАПИСАТЬ ОПИСАНИЕ КОДА , КАК ОН БЫЛ НАПИСАН , - вопрос №13570460 от qaz160904 19.09.2020 06:45

Question

Информатика: НАПИСАТЬ ОПИСАНИЕ КОДА , КАК ОН БЫЛ НАПИСАН , ВСЕ ФУНКЦИИ #include #include #include #include #include #include #include #include #define n 10 using namespace std; struct FIO { char surname[100]; char name[100]; char fatherland[100]; }; struct Data { int day, month, year; }; struct Pasport { int num; Data bday; string citi; string street; int home, sq; }; struct Hotel { FIO fio; Pasport pas; char cel[100]; Data reg; Data otzd; double sum; }; void Show(Hotel a[n]) { cout dd mm yy; //1 Ввод с клавиатуры

qaz160904 · Answer

Const
n = 10;
var
a : array [1..n] of integer;
r : boolean;
i,j : integer;
begin
//Формирование массива пропущено

r := true;
While r do
begin
if a[i] mod 2 =0 then
begin
for j := n-1 downto i + 2 do
a[j] := a[j-1];
a[i+1] := 0;
r := false;
end;
i := i +1;
end;
for i := 1 to n do
writeln (a[i]);
end.

Во избежании ошибок стоит учесть наличие такового элемента в массиве и размерность массива (чтобы его можно было корректно расширить на один элемент)