fkn+antitotal

http://fkn.ktu10.com/?q=node/8694

Пользователь вводит в консоль строки вида (имя + произвольное число пробелов + балл):

http://fkn.ktu10.com/?q=node/8697
Пользователь передает целое положительное число N, выведете на экран последовательность от 1 до N "ёлочкой"

var k,m, n, i: integer;
begin
writeln ('введи-ка число');
readln(n);
k:=1; 
m:=1; 
for i:=1 to n do
begin
write(i, ' ');
if k=m then
begin
k:=0;
m:=m+1;
writeln;
end;
k:=k+1;
end;
end.

http://fkn.ktu10.com/?q=node/8697

Модифицируйте решение предыдущей задачи. так чтобы пользователь вводил второе число M, которое отвечало бы за длину возрастающего фрагмента.

var m, i, n, a: integer;
begin
writeln ('введи число ');
readln (m);
writeln ('введи длину фрагмента-ограничитель');
readln (a);
if m<0 then writeln ('error');
i:=8;
while i<=m do begin
n:=n+1;
if (n>a) then begin write (3,' ');
n:=0;
end
else begin write (i,' ');
i:=i+2;
end;
end;
end.

Если вам нужно выставить внешнюю ошибку валидации (напр. с бэкэнда) и у вас есть код вроде:

http://fkn.ktu10.com/?q=node/8697
Пользователь вводит целое положительное число N, если оно не соответствует критериям (то есть не является положительным), выведете сообщение об ошибке, в противном случае выведите на экран все числа последовательности, не большие N, сформированной следующим образом: 8 10 3 12 14 3 16 18 3 20 22 3 и т.д.

@Entity()
@Unique(["field1"]) // one field
@Unique("my_index_name", ["field1", "field2"]) //  перечисляем поля, которые включаем в индекс
export class MyEntity {
  @PrimaryGeneratedColumn('uuid')
  id: string;
  
  @Column()
  field1: string;
  
  @Column()
  field2: string;
}

Источник идеи: https://newbedev.com/typescript-typeorm-...

• How to handle TypeORM entity field unique validation error in NestJS: https://stackoverflow.com/a/66519642

У вас есть программа, использующая цикл while:

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

Объясните что делает эта программа (что будет выведено на экран и почему)
Перепишите её с помощью цикла repeat/until
Перепишите её с помощью цикла for

(вопрос 1) каждое следующее число увеличивается на 5, вывод консоли 6 11 16 21 26 ... 91 96 является последним, потому что следующий шаг цикла не удовлетворяет условию.

Имеется программа:

var i: integer;
begin
  for i:=5 to 34 do
    write(i, ' ');
 
  readln();
end.

Ответьте на вопросы/выполните задания

Что в ней происходит?
Что будет на экране после её выполнения?
Перепишите её, используя цикл while.
Перепишите её, используя цикл repeat/until.

(вопрос 1) вывод чисел от 5 до 34
(вопрос 2) 5 6 7 8 9 10 11 12 13 14 15 16 17
18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

Решите с помощью цикла repeat/until:
Выведите на экран, все четные числа от 35 до 117 и нечетные числа, делящиеся на 7 и 3 нацело и при этом лежащие в диапазоне от 45 до 99.

program project125;
var a: integer;
begin
  a:= 35;
  repeat
    if ((a mod 2)=0) or ((a mod 2)=1) and ((a mod 3)=0)
    and ((a mod 3)=0) and (a>44) and (a<100) then
      write(a, ' ');
      a:=a+1
  until (a>117) ;
  readln();
end.