var a: array[1..3] of array[1..4] of string;
2.Length(s): возвращает длину строки s;
Copy(s, p, n): возвращает подстроку строки s длины n с позиции p;
Delete(s, p, n): удаляет из строки s n символов с позиции p;
Str(x, s): переводит число x в строку и сохраняет результат в s.
3.Типизированные файлы - файлы, состоящие из компонентов одного типа, число которых заранее не определено.
Нетипизированные файлы - файлы, где информация записывается и считывается блоками определенного размера, в них могут храниться данные любого вида и структуры.
Текстовые файлы - файлы, состоящие из любых символов. Они организуются по строкам, каждая из которых заканчивается символом "конец строки".
4.а)
ответ: 46.
б)
ответ: 112.
uses drawman;
{Рисует одну вишенку по часовой стрелке, начиная с верхней линии}
procedure Berry();
begin
onvector(1, 0);
onvector(1, -1);
onvector(0, -1);
onvector(-1, -1);
onvector(-1, 0);
onvector(-1, 1);
onvector(0, 1);
onvector(1, 1);
end;
{Рисует сразу оба листка}
procedure Leaf();
begin
onvector(2, 0);
onvector(2, -2);
onvector(-2, 0);
onvector(-4, 4);
onvector(-2, 0);
onvector(2, -2);
onvector(2, 0);
end;
begin
field(15, 12);
topoint(6, 10);
pendown;
Leaf;
onvector(-3, -6);
onvector(-1, 0);
Berry;
onvector(1, 0);
onvector(3, 6);
onvector(0, -6);
Berry;
end.
Программаны қосу әдеттіге тәсілдер арқылы іске асырылады: Жұмыс үстеліндегі жарлықты басу немесе операциялық жүйенің басты мәзірі арқылы.