Помогите,пожалуйста. По номеру дня недели вывести его название. Например, если а=1 то...

Question

Помогите,пожалуйста.

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

Answer 1

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