Sunday September 16 2007

Portugol

 

Algoritmo Pág_37_n

VAR

            A, B, C, x: INTEIRO;

INICIO

leia A;

leia B;

leia C;

x <- (A * A) + (B * B) + (C * C) + (2 * A* B) + (2 * A* C) + (2 * B * C);

escreva x;

FIM

 

Comments »

The URI to TrackBack this entry is: http://eipo.blogsome.com/2007/09/16/portugol/trackback/

No comments yet.

RSS feed for comments on this post.

Leave a comment

Line and paragraph breaks automatic, e-mail address never displayed, HTML allowed: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <code> <em> <i> <strike> <strong>