iTakinn/cpfs_pascal
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

aaa

Browse Source
This commit is contained in:
iTakinn
2026-05-28 14:13:52 -03:00
parent 9722205161
commit 811ad6eef1
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
.vscode/GTEMP.pas
Vendored
+1 -1
View File
@@ -29,7 +29,7 @@ function validarCPF(var cpf:string):boolean;
dig2 := 11 - (soma mod 11); dig2 := 11 - (soma mod 11);
if (dig2 = 10) or (dig2 = 11) then if (dig2 = 10) or (dig2 = 11) then
dig2 := 0; gitea@10.0.0.42:iTakinn/cpfs_pascal.git dig2 := 0;
ValidarCPF := ValidarCPF :=
(dig1=(Ord(cpf[10])-48)) and (dig2=(Ord(cpf[11])-48)); (dig1=(Ord(cpf[10])-48)) and (dig2=(Ord(cpf[11])-48));