Ввести пять чисел и найти наибольшее из них.4 15 9 56 4 ... 1.составьте блок -схему алгоритма

var a,b,c,y,x,min,max:integer;beginwriteln('Введите первое число');readln(a);writeln('Введите второе число');readln(b);writeln('Введите третье число');readln(c);writeln('Введите четвертое число');readln(x);writeln('Введите пятое число');readln(y);    if a > b then max :=a else max :=b;    if max < c then max:=c;    if max < y then max:=y;    if max < x then max:=x;writeln('Максимальное число = ',max);end. Я плохой художник)