... comandosNos comandos vinculados ao with, a referência a um campo do registro é feita apenas com a utilização do identificador daquele campo. Como ocorre em outras situações, se a lista de comandos ... denominado Quadrado com um tamanho de 100 Bytes. A adoção da denominação Quadrado e não Quadrados, como estabelecido no comando Assign, se dá pelo fato de que a interação do Pascal com discos é feita ... r);end;{Funcao DigitoVerificador}beginComp := Length(s);ArmazenaDigitos(s, Digitos, Comp);Soma := 0;for i := Comp downto 1 doSoma := Soma + Digitos[i]*(Comp - i + 2);Dv := 11 - Soma mod 11;if...