13 lines
165 B
Plaintext
13 lines
165 B
Plaintext
entier $i;
|
|
main()
|
|
{
|
|
entier $carre;
|
|
$i = 0;
|
|
tantque $i < 10 faire
|
|
{
|
|
$carre = $i * $i;
|
|
ecrire( $carre );
|
|
$i = $i + 1;
|
|
}
|
|
}
|