Ребят, помогите пожалуйста, очень надо)))) Напишите программу, в которой осуществл

Ребят, помогите пожалуйста, очень надо)))) Напишите программу, в которой осуществляется ввод целых чисел ( ввод осуществляется до тех пор, пока не будет введен ноль) и определение максимального (наибольшего) из введенных чисел. Используйте оператор repeat. Программу нужно написать в паскале.