for i:=1 to 12 do
begin
for j:=1 to 12 do
write(a[j]:3,' ');
writeln;
end;
Двухмерный массив...
Уже третий день мозг себе выношу - ничего не могу придумать... Помогите, пожалуйста, очень надо!)
Нужно написать процедуру, которая перносит первые p столбцов в конец массива, соблюдая порядок их следования. Массив двухмерный из 12 строк.
И объясните алгоритм написания данной процедуры)
И еще был бы признателен, если бы помогли с выводом двухмерного массива - я вывожу с помощью gotoxy() - можно как-нибудь без него?
Нужно написать процедуру, которая перносит первые p столбцов в конец массива, соблюдая порядок их следования. Массив двухмерный из 12 строк.
И объясните алгоритм написания данной процедуры)
И еще был бы признателен, если бы помогли с выводом двухмерного массива - я вывожу с помощью gotoxy() - можно как-нибудь без него?
если вам можно использовать массив бОльшей размерности, то это просто.
сохраняете в переменную from единицу, в переменную to - длину строки + 1.
используете 2 цикла, первым проходите по всем строкам, а вторым от from до p, копируя посимвольно элементы массива из позиции from в позицию to, потом увеличиваете to на единицу.
а потом можно переписать весь массив "влево", если нужно)
p.s. однако нужно правила читать!
сохраняете в переменную from единицу, в переменную to - длину строки + 1.
используете 2 цикла, первым проходите по всем строкам, а вторым от from до p, копируя посимвольно элементы массива из позиции from в позицию to, потом увеличиваете to на единицу.
а потом можно переписать весь массив "влево", если нужно)
Цитата:
И еще был бы признателен, если бы помогли с выводом двухмерного массива - я вывожу с помощью gotoxy() - можно как-нибудь без него?
???
Код:
p.s. однако нужно правила читать!
для малочислиной матрицы найти для каждой строки число элементов кратных пяти и найбольший из получиных результатов