fkn+antitotal

Можно использовать пакет typeorm-fixtures-cli (если требуется, см. наш пример для консольной команды с typescript)

Возможные ошибки при использовании

Применение фикстур

1. Fail fixture loading: bad indentation of a mapping entry at line .., column .:
   items:

   -- неправильный отсутуп в разметке файла .yml

http://fkn.ktu10.com/?q=node/8811
У вас есть программа, использующая цикл while:

var
i: integer;
begin
i:=1;
while i begin
write(i, ' ');
i:=i+5;
end;

readln();
end.

Перепишите её с помощью цикла repeat/until
Перепишите её с помощью цикла for

var
i: integer;
begin
i:=1;
repeat
write(i, ' ');
i:=i+5;
until i>=100;
end.

http://fkn.ktu10.com/?q=node/8697
Выведите на экран таблицу умножения используя только циклы вида while.

var i, j: integer;
begin
  i:=1;
  while (i<=9) do
  begin
  j:=1;
  while (j<=9) do
  begin
 write (i, '*', j, '=',i*j,' ');
 j:=j+1;  
 end;
 i:=i+1;
 writeln();
 end;
 end.

http://fkn.ktu10.com/?q=node/8697
Выведите на экран таблицу умножения используя только циклы вида repeat/until.

var i, j: integer;
begin
  i:=1;
  repeat
  j:=1;
  repeat
 write (i, '*', j, '=',i*j,' ');
 j:=j+1;
 until (j>9);
 writeln();
 i:=i+1;
 until (i>9);
 readln();
 end.

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

Пользователь вводит два целых числа M и N, если M четное, делайте то же, что и в предыдущей задаче, а если нечётное, то умножайте M в цикле на 3 до тех пор пока результат не станет больше N (и выводите каждый из промежуточных результатов умножения на экран), например для:

M := 3;
N : = 15;

Получим:

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

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

6
3

А для 8:

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

Пользователь вводит числа до тех пор пока им не будет передан ноль. В ответ на каждое число программа должна сообщать чётное оно или нет.

Получите первую и последнюю цифры числа 15 с помощью оперций div и mod (решается без цикла)

program Project1112;
var a: integer;
begin
  a:=15;
  write('pervaya cifra - ',a div 10,' ');
  write('vtoraya cifra - ',a mod  10);
  readln();
end.

Вывести на экран все числа от 4 до 100 с шагом 4, т.е.:

4 8 12 16.......100

program Project1111;
var i: integer;
begin
  i:=4;
  while (i<=100) do
    begin
      write(i,' ');
      i:=i+4;
    end;
  readln();
end.

http://fkn.ktu10.com/?q=node/7341
не работает код, не могу разобраться в проблеме.

Пользователь вводит целые числа в цикле (разные: четные, нечетные, положительные, отрицательные в любом порядке и количестве). Сохраните в переменные первые три отрицательных нечетных числа, сложите их, выведите сумму на экран и завершите цикл.