2. написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности неограниченна).

using system.collection.generic;  

list< int> arr = new list< int> ();

int max = convert.toint32(console.; // максимальный порог

for(int i = 0; i < max; i++)

{

arr.add(convert.toint32(console.;

}

arr.sort();

console.writeline(arr[max]);

var max,h: integer;

begin

max: =-maxint-1;

repeat

begin

read(h);

if(h> max) then max: =h;

end;

until h > 0;

writeln(max);

end.

  я тут немного отсебятины добавил, что бы программа не слетала если что-то нерпавильное вводиш))

vara: string; b: integer; beginwriteln ('введите строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; while (b = 1) dobeginwriteln ('введіте строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; end;

end. 

var

  x: real;

begin

  readln(x);

writeln(x: 0: 0);

end.