fkn+antitotal

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

Пользователь вводит целые числа. Пока он не введёт число большее 15, в ответ на каждое введённое число выводите сумму этого числа и числа 7, если же введённое число больше 15, то цикл необходимо завершить.

program programma1;
var a: integer;
begin
  a := 1;

  while (a <= 15) do
  begin
    writeln('Vvedite celoe chislo:');
    readln(a);
    writeln(a + 7);
  end;
  writeln('Chislo bolshe 15');
  readln();
end.   

Вроде как так делать неправильно, подробности выяснем

задача 6 урок 21

Пользователь получает на вход целое положительное число N напишите рекурсивную функцию, которая вернет число Фиббоначи стоящии под этим номером

Решение

задача 5 урок 21

Пользователь получает на вход целое положительное число N напишите рекурсивную процедуру, которая выведет все числа Фиббоначи от первого до N-ого

Решение

Урок 13.1 Задача 19

Пользователь передает целое положительное число N, выведете на экран последовательность от 1 до N "ёлочкой", например для N=18:

1
2 3
4 5 6
7 8 9 10
11 12 13 14 15
16 17 18

ПРИМЕЧАНИЕ: эту задачу можно решить, как вложенными циклами, так и вообще одним циклом (что более изящно).
Решите указанными двумя способами.

1. С использованием вложенных циклов

Можно попробовать что-то вроде:

import * as joi from 'joi';

permission: joi
     .string()
     .required()
     .valid(...Object.values(SomeMyEnum)),

Пользователь вводит подряд 4 целых числа, сохраните их одновременно в двух разных
двумерных массивах:

1) так чтобы в каждом подмассиве было 2 элемента.
2) так чтобы в каждом подмассиве было по 1 элементу

Обойдите эти двумерные массивы и распечатайте результат (значения очередного
подмассива печатайте с новой строки

задание 1 урок 16 new

задача 4 урок 21

Дано целое положительное число N, вычислите N! (эн факториал).

Решение

program task_4_lesson21;
function factarial(n: integer): integer;
begin
  if n = 1 then
    result := 1
  else
    result := n * factarial(n - 1);
end;
var n: integer;
begin
  readln(n);
  write(factarial(n));
  readln
end.

Консоль

7
5040

задача 3 урок 21

Дано целое положительное число A и целое положительно число B. Выведите на экран все числа, расположенные между между ними.

Для каскадного обновления используйте в EntityManager метод save() а не update(), т.к. на момент написания данной заметки update не поддерживает каскадные "фишки":

Updates entity partially. Entity can be found by a given condition(s).
* Unlike save method executes a primitive operation without cascades, relations and other operations included.
* Executes fast and efficient UPDATE query.