Задача 10 Урок 6

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

var
    a: integer;
    b: real;
    c: boolean;
begin
    writeln ('vvedite chisla');
    readln (a);
    readln (b);
    c := a > b;
    writeln ('pervoe chislo > vtorogo: ', c);
    readln ();
end. 

Вернёт True