Если ученик петя получает отметку 5, то должно на экране монитора появиться сообщение "отлично" , если 4 " хорошо" , 3-"удовлетворительно", 2 " плохо". если отметка меньше 2 или больше 5 , то программа должна выдать сообщение , что такой отметки не существует запишите в виде программы pascal, и если можно нарисуйте к ней блок-схему

Program Z1;
uses crt;
var a:real;
begin 
write('Vvedite ocenku : ');readln(a); 
if a=5 then writeln('Otlichno') 
 else if a=4 then writeln('Horosho')   
  else if a=3 then writeln('Udovletvoritelno') 
   else if a=2 then writeln('Ploho')
     else writeln('Takoi ocenki net!'); 
readkey;
end.