# 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

### 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