Не могу понять (встречен неожиданный символ''') на 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;
begin
clrscr;
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 of
1,2:writeln('Плохо');
3: writeln('Удовлетворительно');
4: writeln('Хорошо');
5: writeln('Отлично');
end;
readkey;
end.