Begin
  PrintLn 'Super Calculator'
  var Value1 Integer
  var Value2 Integer
  var Result Integer
  Print 'Enter value 1: '
  Assign Value1 0
  InputLn Value1
  Print 'Enter value 2: '
  Assign Value2 0
  InputLn Value2

  Assign Result Value1
  Increment Result Value2
  Print 'Sum of two values is: '
  PrintLn Result
End