Запишите условие которое означает < одно из значений переменных a или b равно нулю>. Заполните пропуски, удалите неверно логическую операцию: ( . . . ) ... ( . . . )

Запишите обратное условие:

( . . . ) ... ( . . . )

var a: array[1..3] of array[1..4] of string;

Length(s): возвращает длину строки s;

Copy(s, p, n): возвращает подстроку строки s длины n с позиции p;

Delete(s, p, n): удаляет из строки s n символов с позиции p;

Str(x, s): переводит число x в строку и сохраняет результат в s.

Типизированные файлы - файлы, состоящие из компонентов одного типа, число которых заранее не определено.

Нетипизированные файлы - файлы, где информация записывается и считывается блоками определенного размера, в них могут храниться данные любого вида и структуры.

Текстовые файлы - файлы, состоящие из любых символов. Они организуются по строкам, каждая из которых заканчивается символом "конец строки".

ответ: 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.