begin
  integer I
  real R
  string(255) S, T, U
  I = 123
  I = 123 ^^ 2
  R = 3.141592653589793
  R = 2 / 3.141592653589793
  S = "hello world"
  S -> T.(" ").U
! S." OK" -> T.(" ").U
  S = "left"." "."right"
  S <- "left"." "."right".T
  S = T."right"
  S = T.U
endofprogram