Студопедия.Орг Главная | Случайная страница | Контакты | Мы поможем в написании вашей работы!  
 

Пример 8.6



Ввести массив, описанный в примере 8.5, «по столбцам». Вывести часть элементов этого массива, расположенных в строках с номерами 3, 4, 5 и в столбцах с номерами 7-10. Вывод осуществлять «по строкам».

begin

for k:=0 to 10 do

for i:=0 to 5 do read(c[i,k]);

for i:=3 to 5 do

for k:=7 to 10 do write(c[i,k]);

end;


Пример 8.7

Написать фрагмент программы, содержащий вывод матрицы C(10 ´ 20) в виде таблицы, содержащей 10 строк и 20 столбцов. Индексацию строк начать с –1, столбцов с 0.

program abcd;

var c:array [-1..8,0..19] of real;

i,j:integer;

begin

.

.

.

for i:=-1 to 8 do

begin

for j:=0 to 19 do write(c[i,j]:8:3);

writeln

end

end.

Тело внутреннего цикла содержит два оператора: for и writeln. После того, как оператор for выведет очередную строку матрицы, оператор writeln осуществляет переход на новую строку.

 
 






Дата публикования: 2015-01-24; Прочитано: 141 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!



studopedia.org - Студопедия.Орг - 2014-2024 год. Студопедия не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования (0.005 с)...