Ответы на вопрос:
Не знаю, как у тебя, но у меня они просто заменяют друг друга, когда я их перетаскиваю мышкой на нужное место.
//вот так компилируется без ошибок 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.
Популярно: Информатика
-
Sasha7799925.11.2021 11:29
-
Mia87101.01.2020 02:10
-
Dasha899923.11.2020 21:15
-
markthebest9510.04.2021 15:35
-
Kotumi01.03.2022 01:51
-
igubanova10.08.2020 18:44
-
анг3622.06.2023 09:38
-
tati986040618.01.2021 01:12
-
dbonapik09.03.2020 03:20
-
anna2610201527.04.2020 23:56