Не могу понять (встречен неожиданный символ''') на 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.
152
158
Ответы на вопрос:
//вот так компилируется без ошибок 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.
Популярно: Информатика
-
elisavetafolst04.08.2022 02:55
-
смерть7301.02.2021 04:58
-
sssmak122.04.2020 05:40
-
marinadoren30.04.2023 06:54
-
Лиза87889789705.09.2022 19:55
-
лисичка2345621.09.2020 13:59
-
tka4ukilia201728.07.2021 06:11
-
Миксеры05.02.2022 12:29
-
irenda82800122.12.2022 11:43
-
Ididhhxj10.08.2020 08:40