http://fkn.ktu10.com/?q=node/8697
Пользователь вводит четное целое число (если нечетное сообщите об ошибке). Делите это число в цикле на 2 до тех пор пока оно делится, выводя каждый промежуточный результат, например для 12 в консоли получим:
6
3

createjs...:Uncaught DOMException: Failed to execute 'toDataURL' on 'HTMLCanvasElement': Tainted canvases may not be exported.

Для одного из вариантов выгрузки баннера можно получить ошибку выше (в консоли браузера), при этом при предпросмотре все работает нормально

Возможное решение

Создайте виртуальный хост и откройте баннер с него, чтобы имитировать работ настоящего сайта, тогда ограничения браузера, приводящие к этой ошибки применяться не будут

http://fkn.ktu10.com/?q=node/8697
Пользователь вводит числа до тех пор пока им не будет передан ноль. В ответ на каждое число программа должна сообщать чётное оно или нет.

var a: integer;
begin
repeat
       writeln ('введите число');
        readln (a);
               if ((a mod 2)=1)  then writeln ('число нечетное')
       else writeln ('четное');
       until (a=0);
       write('end');
end.

Задача 1 урок 16

Пользователь вводит подряд 4 целых числа, сохраните их одновременно в двух разных двумерных массивах:
1) так чтобы в каждом подмассиве было 2 элемента.
2) так чтобы в каждом подмассиве было по 1 элементу
Обойдите эти двумерные массивы и распечатайте результат (значения очередного подмассива печатайте с новой строки)

Решение

Задача 2 урок 16

Вспомогательная задача (можно решить, просто используя одномерные массивы):
Пользователь вводит 4 целых числа, считаем все их координатами на прямой, а именно:
первые два числа - начало и конце отрезка 1
вторые два - начало и конец отрезка 2

Решение

http://fkn.ktu10.com/?q=node/8697
Модифицируйте предыдущую задачу так, чтобы в каждой чётной (той, у которой номер чётный) строке выводилось N символов, а в каждой нечетной N/2 символов (сделайте проверку того, что N/2 больше нуля)

http://fkn.ktu10.com/?q=node/8697
M раз выведете на экран числа от 1 до N с помощью вложенных циклов. Так чтобы в консоли было:
1 N
1......N}M раз

Дан массив длиной N (не более 100 элементов), состоящий из случайно выбранных чисел из диапазона от 0 до k, где 0≤k Найдите в этом массиве длину самого короткого фрагмента, который содержит все числа от от 0 до k.

задача 16 урок 15

задача 9 урок 17

Пользователь вводит исходную строку s.
Ваша программа должна вернуть другую строку, в которой все смежные (соседние) повторяющиеся символы должны быть "удалены" (т.е. повторов в новой строке быть не должно), например:
для строки:

5533g

вернуть:

53g

для строки:

b5ghh55788oooggtttttt

вернуть:

b5gh578ogt

Решение

Формы Бэкуса-Наура.

Задача 1

<Cifra> ::= [0-9]
<CeloeChislo> ::= "0" | ([1-9] <Cifra>*)
<Virazhenie> ::= <CeloeChislo> (("+" | "-") <CeloeChislo>)*

Задача: Модифицируйте это выражение таким образом, чтобы была возможна поддержка операции умножения, т.е. чтобы форма соответствовала выражениям:

3
23*4
1+
1+23*4*7+6-7+8*9

Решение: