cstr/tp1-obj1-meens/first.ept
2025-03-27 12:42:38 +01:00

8 lines
111 B
Plaintext

fun myfun (x:int;y:int) returns (z:int;t:int)
var x2 : int;
let
x2 = x*x ;
t = x2 + 3*x ;
z= t + y ;
tel