Question

Help! Запишите на языке Паскаль программу, которая по номеру дня недели будет выводить его название, но необходимо использовать массив, нельзя использовать конструкцию ветвления ( if и т.п.)В информатике не разбираюсь, поэтому жду код программы.

Answer 1

Ответ:

Const Days : Array [1..7] Of string =  

('Понедельник','Вторник','Среда','Четверг','Пятница','Суббота','Воскресенье');

var n: integer;

begin

write('Введите номер дня недели: ');

readln(n);

writeln(days[n]);

end.