[Info-vax] ChatGPT - Joke about OpenVMS and Linux walking into a bar

[Slo]

> Code a DCL procedure to add the first 20 integers, then mail it to vms at vsi.com

$! This DCL procedure adds the first 20 integers and sends the result to vms at vsi.com
$! Declare variables
$ integer = 0
$ sum = 0
$! Loop through the first 20 integers and add them to the sum
$ do i = 1, 20
$ sum = sum + i
$ enddo
$! Use the MAIL command to send the result to vms at vsi.com
$ mail/subject="Sum of the first 20 integers" vms at vsi.com "The sum of the first 20 integers is: " sum
$! End the procedure
$ exit