algoritmo ()
{
// declaracao multiplas de variaveis ao estilo C
declare caracter a,b,c; // declara 3 variaveis tipo caracter
declare inteiro i,j,k; // declara 3 variaveis tipo inteiro
declare real p,q,r; // declara 3 variaveis tipo real
declare cadeia s,t,u; // declara 3 variaveis tipo cadeia
// atribuicao de valores
a := b := c := 'Z';
i := j := k := -34;
p := q := r := raiz(2);
s := t := u := "C A Linguagem de Programacao";
// exibindo os valores atribuidos
escreva("valor das variaveis a, b e c: ", a," ",b," ",c);
escreva("valor das variaveis i, j e k: ", i," ",j," ",k);
escreva("valor das variaveis p, q e r: ", p," ",q," ",r);
escreva("valor das variaveis s, t e u: ", s," ",t," ",u);
escreva("variaveis declaradas.");
}