Create a program that, by the ordinal number of the day of the week

Create a program that, by the ordinal number of the day of the week, displays the corresponding phrase – “Saturday”, “Sunday” or “Working day”

program zz1;
var a: integer; // set up a variable
begin
write (‘enter the number of the day of the week’); // enter the day of the week from the keyboard
read (a);
case a of // depending on the entered day of the week, select the displayed answer
7: writeln (‘Sunday’);
6: writeln (‘Saturday’)
else
writeln (‘Working day’);
end;
end.