Составить программу: на ввод 2 числа - рост в см коли и васи. программа должна вывести сообщение "вася выше коли " или "коля выше васи

var rK, rV: integer;

begin

writeln('Введите рост Коли:');

readln(rK);

writeln('Введите рост Васи:');

readln(rV);

if rK>rV then writeln('Коля выше Васи.')

else writeln('Вася выше Коли.');

end.