Сформировать массив так, чтобы сначала располагались m1 столбцов массива x, затем m2 столбцов массива y - Turbo Pascal
Формулировка задачи:
Доброго времени суток. Написал программу, но не могу понять где ошибся. Программа работает наполовину правильно.
Дано два двумерных массива х(nm1) ,y(nm2). Cформировать массив z(n(m1+m2)), таким об¬разом чтобы сначала располагались m1 столбцов массива x, затем m2 столбцов массива y. Заранее спасибо. Ошибка где то с 35 по 40 строку
Решение задачи: «Сформировать массив так, чтобы сначала располагались m1 столбцов массива x, затем m2 столбцов массива y»
textual
Листинг программы
program c7; uses crt; const n=2;m1=2;m2=2; var x:array[1..n,1..m1] of real; y:array[1..n,1..m2] of real; z:array[1..n,1..m1+m2] of real; k,i,j,l:integer; begin clrscr;randomize; for i:=1 to n do begin for j:=1 to m1 do begin x[i,j]:=random*11-5; write(x[i,j]:8:4); end; writeln; end; writeln(' '); for i:=1 to n do begin for k:=1 to m2 do begin y[i,k]:=random*11-5; write(y[i,k]:8:4); end; writeln; end; for i:=1 to n do begin for j:=1 to m1 do begin z[i,j]:=x[i,j]; end; end; for i:=1 to n do begin for j:=m1+1 to m1+m2 do begin z[i,j]:=y[i,j-m1]; end; end; writeln; for i:=1 to n do begin for j:=1 to m1+m2 do begin write(z[i,j]:8:4,' '); end; writeln; end; readln; end.
Объяснение кода листинга программы
В данном коде используется язык программирования Turbo Pascal. Он содержит несколько переменных и массивов, которые используются для решения поставленной задачи.
- n - это константа, которая определяет количество строк в массиве x и y.
- m1 и m2 - это константы, которые определяют количество столбцов в массиве x и y соответственно.
- x, y и z - это массивы, которые используются для хранения данных.
- k, i и j - это переменные, которые используются для итерации по массивам x, y и z.
- randomize - это команда, которая генерирует случайное число.
- for - это конструкция цикла, которая используется для итерации по строкам или столбцам массива.
- write - это команда, которая выводит значение переменной на экран.
- readln - это команда, которая читает ввод пользователя и завершает программу. В начале программы инициализируются случайные числа для генерации значений массивов x, y и z. Затем происходит итерация по каждой строке массива x и y, где каждая строка состоит из m1 и m2 столбцов соответственно. Значения каждой ячейки массива записываются на экран. После этого происходит итерация по каждому столбцу массива z, где каждая строка состоит из n строк массива x и y. Значения каждой ячейки массива z записываются на экран. В конце программы выводится общий результат.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д