Napissat the program which defines the maximum number from the sequence of polozhiktelny numbers entered from the keyboard (length of the sequence is not limited). (Cycle Whil or Repeat) Definition of the maximum number of the sequence of positive numbers. You enter numbers into a line through a gap. For completion of input enter zero.-> 56 - & gt; 75 - & gt; 43 - & gt; About the Maximum number: 75.
Brarius
105
Var A, M: integer; Begin M: = 0; Repeat Read (A); if A> M then M: = A; Until A = 0; WriteLn (Max =, M) End.
343
Answer add
mark
mark
Other questions in the section - informatics
Vavila
Napishite, please, it passes the program according to which in pascal animation of the
2020-10-26 10:00:32
Egor
four-digit is given I chisloit to determine the sum of the first and last
2020-10-26 10:00:32
Molafit
Pascal subject Stroki1) From the keyboard is entered a line. To count How to
2020-10-26 10:00:32
Marianovich
Pascal a subject of Line 1) From the keyboard is entered the line consisting
2020-10-26 10:00:32
Kirponos
To make the program - the converter which requests type of unit of measure
2020-10-26 10:00:32
