Как выполнить рисунки по описаниям координатам?

видимо речь идет о кодировании графических изображений векторного типа.

это учебник босовой, 6 класс. итак есть координатная плоскость с осями - ох (по горизонтали) и оу по вертикале. читаем условие:

например:

установить 60,20 одна клеточка на рисунке принимается за 10. поэтому откладываем на оси ох 6 клеточек, на оси оу 2 клеточки. находим точку на пересечении. это и будет начальной точкой рисунка. а теперь просто. рисуем линии от этой начальной точки. например линия (20,60). от точки которую мы только что нашли откладываем по оси х 20 оси у 60. рисуем точку и соединяем эти 2 найденных точки прямой линией. дальше идет рисунок в такой же последовательности но уже исходной считается 2 точка. 

не знаю, понятно ли объяснила. 

если что-то будет не так - напиши, испралю. у меня простог нет возможности проверить, выполняется  

program string_7; var s: string; k,l,i: integer; begin write('введите строку: '); readln(s); k: =0; l: =0; for i: =1 to length(s) dobegin if s[i]='н' then k: =k+1; if s[i]='м' then l: =l+1end; writeln('н=',k); writeln('м=',l); if k> l then writeln ('больше букв н'); if k< l thenwriteln ('больше букв м'); if (k = 0) and (l = 0) thenwriteln ('таких букв нет'); end.

так будет элсе выкидывало бы что букв н больше, если бы ни м ни н не встретилось))

read(n);

s = str(n);

n1 : = int(s[1]);

n2 : = int(s[2]);

n3 : = int(s[3]);

if (n1+n2+n3) mod 2 = 0 then writeln("сумма чисел четная")