algoritmo que dado um numero inteiro positivo, calcule selcule e escr

[charleshap 0]

Fazer um algoritmo que dado um numero inteiro positivo, calcule e escreva se este e ou não quadrado perfeito

 

até onde eu jah fiz..

 

algoritmo "semnome"
// Função :
// Autor :
// Data : 29/10/2011
// Seção de Declarações 
var
a,x,y:real
inicio
// Seção de Comandos 
escreva("digite o valor de x")
leia(x)
y<-raizq(x)
escreval(y)
se y



fimalgoritmo

[quitZAUMMM 18]

veja: http://br.answers.yahoo.com/question/index?qid=20110313122718AAvxWbc

 

[]s