По номеру дня недели вывести его название. например, если а=1 то вывод «понедельник». начертить блок-схему к в тетради. написать программу к в тетради.

Const b:array[1..7] of string=('Понедельник','Вторник','Среда','Четверг','Пятница','Суббота','Воскресенье');
var a:integer;
begin
readln(a);
writeln(b[a]);
end.