ПОЖАЛУЙСТА ПОМОГИТЕ НЕ МОГУ ПОНЯТЬ (Встречен неожиданный символ''') на 7 строчке
uses crt;
var k:integer;
n:integer;
begin
clrscr;
writeln('Тест по теме "Циклы"');
7 writeln('Вопрос 1. Алгоритм называют циклическим, >);
writeln('если в нем:');
writeln('1)Реализуется многократно повторяющаяся');
writeln(' последовательность действий');
writeln('2)Используются повторяющиеся праметры);
writeln('3)Много раз используются одни и те же операторы);
writeln('4)Используются команда выбора');
write('Введите номер правильного ответа:');
read(n);
if n=1 then k:=k+1;
writeln('Вопрос 2. Сколько раз будет выполнятся цикл,<);
writeln('если начальное значение параметра -6');
writeln('конечное значение 6,');
writeln('шаг изменения параметра равен 3');
writeln('1)6 раз');
writeln('2)5 раз');
writeln('3)4 раз');
writeln('4) Не выполнится ни разу');
write('Введите номер правильного ответа:');
read(n);
if n=2 then k:=k+1;
cace k of
1,2:writeln('Плохо');
3: writeln('Удовлетворительно');
4: writeln('Хорошо');
5: writeln('Отлично');
end;
readkey;
end.

//вот так компилируется без ошибокuses crt;var k:integer;n:integer;beginclrscr;k:=0;writeln('Тест по теме "Циклы"');writeln('Вопрос 1. Алгоритм называют циклическим, >');writeln('если в нем:');writeln('1)Реализуется многократно повторяющаяся');writeln(' последовательность действий');writeln('2)Используются повторяющиеся праметры');writeln('3)Много раз используются одни и те же операторы');writeln('4)Используются команда выбора');write('Введите номер правильного ответа:');read(n);if n=1 then k:=k+1;writeln('Вопрос 2. Сколько раз будет выполнятся цикл,<');writeln('если начальное значение параметра -6');writeln('конечное значение 6,');writeln('шаг изменения параметра равен 3');writeln('1)6 раз');writeln('2)5 раз');writeln('3)4 раз');writeln('4) Не выполнится ни разу');write('Введите номер правильного ответа:');read(n);if n=2 then k:=k+1;case k of1,2:writeln('Плохо');3: writeln('Удовлетворительно');4: writeln('Хорошо');5: writeln('Отлично');end;readkey;end.