Приведено очень подробное описание основных элементов программы. Реализована на языке Паскаль. Полезна тем, кто только начинает учить программирование.

program wwod_massiva_n_na_m;
 {crt - библиотека работы с экраном и клавиатурой}
 uses crt;
 {раздел констант:определение значений n и m}
 const
 n=2;m=3;
 {раздел переменных}
 var
 {массив вещественных чисел: n строк, m столбцов}
 a:array[1..n, 1..m] of real;
 {переменные целого типа для задания номеров строки и столбца}
 i,j: integer;
 begin
 {начало тела программы (раздела операторов)}
 {очистка экрана}
 clrscr;
 {вывод текста, заключённого между апострофами}
 writeln('Ввод массива (элементов матрицы) по строкам:');
 {на место m выводится значение}
 writeln('по ',m,' элемента (ов) через пробел,конец строки - Enter');
 {цикл по i - номерам строк}
 for i:=1 to n do
 {для каждого i выполняется два оператора (вывода и цикла),
 заключенные между begin и end}
 begin
 writeln('введите ',i,'-ую строку');
 {цикл по j - элементам столбца}
 for j:=1 to m do read(a[i,j]);
 end;
 readln;
 writeln('Вывод введенного массива');
 for i:=1 to n do
 begin
 {перевод строки}
 writeln;
 for j:=1 to m do
 {формат вывода, всего 4 знака: 3 цифры, точка, 1 цифра,
 затем пробел}
 write(a[i,j]:4:1,' ');
 end;
 {ожидание Enter}
 readln;
 {конец раздела операторов и всей программы}
 end.

Оценка - 1.0 (9)

2010-08-18 • Просмотров [ 1784 ]

Учебная программа - работа с массивом