algoritmo ()
{
// declaracao multipla de variaveis em linha, estilo algoritmo
declare a,b,c : caracter;
declare i,j,k : inteiro;
declare p,q,r: real;
declare s,t,u: cadeia;
// atribuicao de valores
a := b := c := 'Z';
i := j := k := 12;
p := q := r := 3.1415;
s := t := u := "Algoritmos";
// exibindo os valores atribuidos
escreva ("valor de a, b e c: ", a," ",b," ",c);
escreva ("valor de i, j e k: ", i," ",j," ",k);
escreva ("valor de p, q e r: ", p," ",q," ",r);
escreva ("valor de s, t e u: ", s," ",t," ",u);
escreva ("variaveis declaradas");
}