Напишите программу, в которой юзеру предлагается дополнить до 100 некоторое число

// Программка на языке Паскаль.

var
   t, x : integer;    // объявляем переменные вещественного типа.
   label l;             // объявляем метку.
begin
   t := random(0,99);  // задаем случайное число от 0 до 99.
   l: writeln (Дополните до 100 число: , t,, введите нужное число:); 
   readln(x);               // считываем значение, введенное с клавиатуры.
      if (x + t) lt; 100 then   // проверяем сумму случайного числа и введенного с клавиатуры.
        begin
          writeln( Введено слишком махонькое число, пробуйте еще раз!); 
          goto l;         // переход на метку.
        end;
      if (x + t) gt; 100 then // проверяем сумму случайного числа и введенного с клавиатуры.
         begin
            writeln( Введено очень великое число, пробуйте еще раз!); 
            goto l;              // переход на метку.
         end;
       if (x + t) = 100 then        // проверяем сумму случайного числа и введенного с клавиатуры.
           writeln( Приветствуем! Ваш вариант правильный);    // вывод строчки на экран.
end.