На сегодняшний день существуют сайты, проводящие тестирование, показывающие теорию при неправильном решении задач. Прямая связь - показ веб-страниц с заданиями, решениями, теорией. Обратная связь - получение данных о правильности решения задач, регулировка количества задач в зависимости от правильности выполнения.
Преимущества: - доступ к контенту от лучших учителей - доступ к урокам в удобное время - возможность "геймификации" - внедрения игрового процесса обучения - моментальная проверка задач - возможность автоматической генерации вариантов задания, делающая задания более разнообразными
Недостатки: - отсутствие реакции на необычные ситуации - отсутствие контроля процесса выполнения - ограниченность круга задач с автоматической проверкой (как правило, тестами) - недостаток "креативных" задач
begin Randomize; Writeln('Элементы массива'); for i := 1 to n do begin a[i] := Random(21) - 10; Write(a[i]:4); end; Writeln; s := a[n]; for i := n - 1 downto 1 do a[i + 1] := a[i]; a[1] := s; Writeln('После циклического сдвига вправо на 1'); for i := 1 to n do Write(a[i]:4); Writeln end.
Тестовое решение: Элементы массива -2 -1 7 10 2 -7 9 -6 -5 -10 После циклического сдвига вправо на 1 -10 -2 -1 7 10 2 -7 9 -6 -5
Задача 2. const n = 10; var a: array[1..n] of integer; i, j, t: integer;
begin Randomize; Writeln('Исходный массив'); for i := 1 to n do begin a[i] := random(101); Write(a[i]:4) end; Writeln; for i := 1 to n-1 do for j := 1 to n-i do if a[j] > a[j+1] then begin t := a[j]; a[j] := a[j+1]; a[j+1] := t end; Writeln('Отсортированный по возрастанию массив'); for i := 1 to n do Write(a[i]:4); Writeln end.
