User input/Text: Difference between revisions

→‎{{header|BabyCobol}}: conform to the task definition
imported>Maxima enthusiast
No edit summary
(→‎{{header|BabyCobol}}: conform to the task definition)
(5 intermediate revisions by 4 users not shown)
Line 488:
Disp "That isn't 7500"
End</syntaxhighlight>
 
=={{header|BabyCobol}}==
<syntaxhighlight lang="cobol">
* NB: whitespace insignificance and case insensitivity
* are used in the field name.
IDENTIFICATION DIVISION.
PROGRAM-ID. USER INPUT.
DATA DIVISION.
01 HUNDRED CHAR STRING PICTURE IS X(100).
01 FIVE DIGIT NUMBER PICTURE IS 9(5).
PROCEDURE DIVISION.
DISPLAY "Enter a string of appropriate length: " WITH NO ADVANCING
ACCEPT HundredChar String.
DISPLAY "Enter a number (preferably 75000): " WITH NO ADVANCING
ACCEPT FiveDigit Number.
</syntaxhighlight>
 
=={{header|BASIC}}==
Line 930 ⟶ 946:
 
=={{header|Elena}}==
ELENA 46.x :
<syntaxhighlight lang="elena">import extensions;
Line 936 ⟶ 952:
{
var num := new Integer();
console.write:("Enter an integer: ").loadLineTo:(num);
var word := console.write:("Enter a String: ").readLine()
}</syntaxhighlight>
 
Line 1,892 ⟶ 1,908:
30 INPUT "ENTER AN INTEGER: ",INTEGER
40 PRINT "YOU ENTERED";INTEGER;"."</syntaxhighlight>
 
=={{header|Nu}}==
<syntaxhighlight lang="nu">
{
String: (input "Enter a string: ")
Number: (input "Enter an integer: ")
}
</syntaxhighlight>
{{out}}
<pre>
Enter a string: Hello world!
Enter an integer: 75000
╭────────┬──────────────╮
│ String │ Hello world! │
│ Number │ 75000 │
╰────────┴──────────────╯
</pre>
 
=={{header|Oberon-2}}==
Line 2,715 ⟶ 2,748:
 
=={{header|Wren}}==
<syntaxhighlight lang="ecmascriptwren">import "io" for Stdin, Stdout
 
var string
18

edits