видимо речь идет о кодировании графических изображений векторного типа.
Это учебник Босовой, 6 класс. итак есть координатная плоскость с осями - ОХ (по горизонтали) и ОУ по вертикале. Читаем условие:
например:
Установить 60,20 одна клеточка на рисунке принимается за 10. Поэтому откладываем на оси ОХ 6 клеточек, на оси ОУ 2 клеточки. Находим точку на пересечении. Это и будет Начальной точкой рисунка. А теперь просто. Рисуем линии от этой начальной точки. например линия (20,60). От точки которую мы только что нашли откладываем по оси Х 20 оси У 60. Рисуем точку и соединяем эти 2 найденных точки прямой линией. Дальше идет рисунок в такой же последовательности но уже исходной считается 2 точка.
Не знаю, понятно ли объяснила.
задание одномерного массива:
var ИмяМассива:array [НижняяГраница..ВерхняяГраница] of ТипЭлементов;
задание двумерного массива:
var ИмяМассива:array [НижняяГраница1..ВерхняяГраница1,НижняяГраница2..ВерхняяГраница2 ] of ТипЭлементов;
заполение массива:
одномерный массив: for i:=1 to 5 do readln(a[i]); {ввод с клавиатуры}
двумерный массив: for i:=1 to 3 do
for j:=1 to 2 do readln(a[i,j]);
вывод массива на экран:
в столбец: for i:=1 to 5 do writeln(a[i]);
в строку: for i:=1 to 5 do write(a[i],' ');
матрица двумерного массива:
for i:=1 to n do
begin
for j:=1 to m do
write (a[i,j]:4);
writeln;
end;
действия с одномерным массивом:
вычисление суммы элементов:
s:=0;
for i:=1 to n do s:=s+a[i];
подсчет элементов, удовлетворяющих условию:
k:=0;
for i:=1 to n do
if a[i] УсловиеОтбора then k:=k+1;
