ПОЖАЛУЙСТА ПОМОГИТЕ НЕ МОГУ ПОНЯТЬ (Встречен неожиданный символ»’) на 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.

Вопрос школьника по предмету Информатика

ПОЖАЛУЙСТА ПОМОГИТЕ НЕ МОГУ ПОНЯТЬ (Встречен неожиданный символ»’) на 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.