Conjuntos
SkiLL-World :: Geral :: Pascal
Página 1 de 1
Conjuntos
Sintaxe:
Type
<identificador>= set of <tipo>;
Operações sobre conjuntos:
A+B União entre
conjuntos
A*B Intersecção
de conjuntos
A-B Diferença
de conjuntos
A<=B Testa se A está
no conjunto B
A<>B Testa a desigualdade
entre conjuntos
1 in A Testa a presença de um
elemento no conjunto A
Exemplo: Programa para testar se uma letra é vogal ou consoante:
program testa_letra;
type
letras = set of 'a'..'z';
var
vogais:letras;
letra:char;
begin
vogais:=['a','e','i','o','u'];
writeln('Digite uma letra');
readln(letra);
if letra in vogais
then writeln('A letra ',letra,' eh uma vogal')
else writeln('A letra ',letra,' eh uma consoante');
end.
Type
<identificador>= set of <tipo>;
Operações sobre conjuntos:
A+B União entre
conjuntos
A*B Intersecção
de conjuntos
A-B Diferença
de conjuntos
A<=B Testa se A está
no conjunto B
A<>B Testa a desigualdade
entre conjuntos
1 in A Testa a presença de um
elemento no conjunto A
Exemplo: Programa para testar se uma letra é vogal ou consoante:
program testa_letra;
type
letras = set of 'a'..'z';
var
vogais:letras;
letra:char;
begin
vogais:=['a','e','i','o','u'];
writeln('Digite uma letra');
readln(letra);
if letra in vogais
then writeln('A letra ',letra,' eh uma vogal')
else writeln('A letra ',letra,' eh uma consoante');
end.
SkiLL-World :: Geral :: Pascal
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
|
|