mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-05 22:38:44 +00:00
21 lines
301 B
Text
21 lines
301 B
Text
|
n := read ();
|
||
|
|
|
||
|
|
case 3 of
|
||
|
|
a -> write (a)
|
||
|
|
| _ -> write (0)
|
||
|
|
esac;
|
||
|
|
|
||
|
|
case 3 of
|
||
|
|
a -> write (a)
|
||
|
|
esac;
|
||
|
|
|
||
|
|
case 3 of
|
||
|
|
a@_ -> write (a)
|
||
|
|
esac;
|
||
|
|
|
||
|
|
case `a (1, 2, 3) of
|
||
|
|
`b -> write (1)
|
||
|
|
| a@`a (_, _, _) -> case a of
|
||
|
|
`a (x, y, z) -> write (x); write (y); write (z)
|
||
|
|
esac
|
||
|
|
esac
|