ПОЖАЛУЙСТА Пожалуйста посчитайте НЕ МОГУ ПОНЯТЬ (Встречен неожиданный символ''') на 7 строчкеuses crt;var k:integer;n:integer;beginclrscr;writeln('Тест по теме "Циклы"');7writeln('Вопрос 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 of1,2:writeln('Плохо');3: writeln('Удовлетворительно');4: writeln('Хорошо');5: writeln('Отлично');end;readkey;end.