Wednesday, February 19, 2025
Monday, February 17, 2025
A rough draft of 10001st Prime
{
2,3,5,7,11,13...
13 is the 6th.
What is the 10001st
prime number?
Answer: .
}
program Prime10001st;
uses math;
var num, sqrnum, max64:Int64;
i, k, cnt : integer;
const rng = 10000;
begin
i := 0; k := 0;
max64 := Trunc(Power(2,63) - 1);
while (i < 7) do
begin
for num:= 2 to max64 do
begin
cnt := 0;
sqrnum:= Trunc(sqrt(num));
for k:=2 to sqrnum do
begin
if (num%k = 0) then
begin
cnt := cnt + 1;
//????
end;
end;
end;
//??? i := i + 1;
end;
end.
Wednesday, February 5, 2025
На 06/02
Задача з codewars Persistent Bugger:
Input output
39 --> 3 (because 3*9 = 27, 2*7 = 14, 1*4 = 4 and 4 has only one digit, there are 3 multiplications)
999 --> 4 (because 9*9*9 = 729, 7*2*9 = 126, 1*2*6 = 12, and finally 1*2 = 2, there are 4 multiplications)
4 --> 0 (because 4 is already a one-digit number, there is no multiplication)
Saturday, February 1, 2025
Попытка Клад оплатить и 1.5% сохранить
Вместо выбора карты, счета,приложения или pay, выбрать Рахунок. И получить платежку на почту. С реквизитами.
И платить по реквизитам без 1.5%.
Friday, January 31, 2025
Sunday, January 26, 2025
Dbf не чіпаємо, маніпуляції тільки з itab
1. Dbf tab містить ВСІ 67-68 полів, Ztab - тільки ті 25-45 полів що використовуються в продовженні ресурсів, їх і копіюємо Dbf не редагува...
-
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 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 ...
-
Код для отс/прс пашет. Упростить, причесать, закомментировать, сдать, мигрировать в продуктив, возлюбить tome management data
-
Дочесать код В прод4 посмотреть по табельному наработки старших товарищей; переслать код