Assertion: variable's number | /r/HasProperty | largestend
Facets:
Source sentences:
text: program largest; var data, largest: integer; begin largest := 0; repeat write('Enter a positive number, end with 0: '); readln(data); if data > largest then largest := data until data = 0; writeln('The larges number was ', largest) end.