14 lines
74 B
Plaintext
14 lines
74 B
Plaintext
procedure()
|
|
entier $a;
|
|
{
|
|
$a = 1;
|
|
ecrire($a);
|
|
}
|
|
|
|
main()
|
|
{
|
|
procedure();
|
|
}
|
|
|
|
|