Напишите программу которая спросит имя юзера и класс в котором он

var
 x: integer; // объявляем перменную
 y: string;  // объявляем перменную
 label x1;  // объявляем метку
begin
   writeln (Введите свое имя: ); // выводим строчку на экран
   readln (y);  // считываем значение переменной
   writeln (Введите класс: ); // выводим строчку на экран
   readln (x); // считываем значение перменной
 x1:if ((x gt; 0 ) and ( x lt;= 11)) then // если введен номер класса  с по 11
  begin
    writeln ( Здравствуй , y); // выводим строчку на экран
      if (x lt; 9 ) then  // если введен класс меньше 9
         writeln ( Ты еще не знаешь Паскаль) // выводим строчку на экран
      else // если класс от 9 и выше
         writeln ( Давай поработаем!) // выводим строчку на экран
   end
  else
     begin // если классgt;11 либо введен иной знак, вводим класс еще раз и идем на метку x1
       writeln ( Неправильно введен номер класса, пробуйте еще раз: ); 
       readln(x);
       goto x1;
    end
end.