1. Указать тип переменной: А:=’PENTIUM’;
a. CHAR
b. INTEGER
c. STRING
d. REAL
2. Определить результат выполнения
a. Length(‘Seasons’) =
b. Length(‘Joe’s First Car’) =
3. Дан фрагмент программы. Определить результат выполнения программы
A:=’KLASS’;
DELETE(A,2,2);
WRITELN(S);

1. Тип переменной A := 'PENTIUM' — это STRING, потому что значение в одинарных кавычках является строкой символов.
   Правильный ответ: c. STRING

2. Результат Length(...):

• Length('Seasons') = 7

• Length('Joe''s First Car') = 15

Пояснение:
Length считает все символы, включая пробелы и знак апострофа. В слове Joe's First Car получается: Joe — 3 символа, ' — 1, s — 1, пробел — 1, First — 5, пробел — 1, Car — 3. Итого 15.

3. Дан фрагмент программы:
   A := 'KLASS'; DELETE(A, 2, 2); WRITELN(S);

Здесь после выполнения DELETE(A,2,2) строка A станет:

KSS

Потому что из слова KLASS удаляются 2 символа, начиная со 2-й позиции: удаляются L и A.

Но в последней строке написано WRITELN(S), а переменная S в фрагменте не объявлена. Поэтому в таком виде программа содержит ошибку и не выполнится.
Если там имелось в виду WRITELN(A), тогда на экран было бы выведено:

KSS