fkn+antitotal

Урок 9 Задача 10:

Коля набрал k баллов, Миша n баллов, а Петя d баллов в ходе соревнований. Если:
сумма баллов Коли и Миши больше 20
или произведение баллов Пети и Миши меньше 55
--то тогда вывести в консоль сообщение о том, что ничья, в противном случае вывести сообщение, что победил Коля.

Урок 21. Задача 8.

"Калькулятор"

Задача 5 Урок 12.1:

Пользователь вводит в консоль символы (после каждого нажимая Enter), в ответ выводите символ '&', до тех пор пока пользователь не введёт '#', после чего завершите программу (не выводя ничего в ответ).

Решение:

var n: char;
begin
  repeat
    writeln('vvedite simvol:');
    readln(n);
    if (n <>'#') then
      write('&');
  until (n <>'#'); // выход из цикла
  readln();
end.   

Урок 9 Задача 9:

Пользователь вводит четыре числа, найдите из них максимальное -- решите через вложенные блоки if в полной форме (без использования логических операций).
Примечание: решение с помощью AND более удобно на практике, но для тренировки понимания тут мы решаем через вложенные блоки.

Урок 9 Задача 8.3:

Пользователь вводит три числа, найдите из них максимальное.
Без вложенных блоков (без and) -- запомнив максимум из первых двух чисел в специальной переменной.

Урок 23. Задача 3.

Есть массив массив уникальных, ненулевых элементов (целые числа, 10 элементов):

[123, 45, 5638, 49, -78, 22, 5, 345, 68, 7]

После каких-то преобразований получился массив:

[123, 5638, 22, 5, 68, 7, 0, 0, 0, 0]

Задача: сформируйте ещё один массив из "потерянных" чисел (всех элементов 1-ого массива, которых нет во втором).

Урок 23. Задача 2.

Есть массив (пусть не более 10 элементов):

[0, 3, 2, 1, 0, 3, 2, 4, 0, -5]

Задача: перенести все нули в конец, так чтобы в итоге получилось:

[3, 2, 1, 3, 2, 4, -5, 0, 0, 0]

Решите со сложностью не более чем 2N

Урок 23. Задача 1.

Есть массив целых чисел (10 элементов), например:

[1, 3, 2, 1, 3, 2, 2, 4, 0, -5]

Задача: вывести на экран все числа, которые встречаются нечетное число раз.
Т.е. в данном случае это:

Урок 19. Задача 4.

Урок 9 Задача 8.2:

Пользователь вводит три числа, найдите из них максимальное.
С вложенными блоками (без and, все операторы if должны быть в полной форме).