Help! Запишите на языке Паскаль программу, которая по номеру дня недели будет выводить его название, но необходимо использовать массив, нельзя использовать конструкцию ветвления ( if и т.п.)В информатике не разбираюсь, поэтому жду код программы.
More Questions From This User See All
Answers & Comments
Ответ:
Const Days : Array [1..7] Of string =
('Понедельник','Вторник','Среда','Четверг','Пятница','Суббота','Воскресенье');
var n: integer;
begin
write('Введите номер дня недели: ');
readln(n);
writeln(days[n]);
end.