Question

Разработать программу на языке Паскаль с использованием массива. Задача: Записать в массив из 7 элементов строкового типа названия дней недели (понедельник, вторник, и т.д.). При вводе с клавиатуры целого числа в интервале от 1 до 7 (это порядковый номер для недели) на экран должен выводиться соответствующий элемент массива (название дня недели). Например: Ввод: 3 Вывод: среда.

Answer 1

Ответ:

Во вложении.

Объяснение:

Answer 2

Для решения данной задачи на языке Паскаль с использованием массива, следует следующий код:

pascalCopy code
program DaysOfWeek;

const
  NumOfDays = 7;

var
  Days: array[1..NumOfDays] of string;
  DayNumber: integer;

begin
  Days[1] := 'понедельник';
  Days[2] := 'вторник';
  Days[3] := 'среда';
  Days[4] := 'четверг';
  Days[5] := 'пятница';
  Days[6] := 'суббота';
  Days[7] := 'воскресенье';

  writeln('Введите номер дня недели (от 1 до 7): ');
  readln(DayNumber);

  if (DayNumber >= 1) and (DayNumber <= NumOfDays) then
    writeln('День недели: ', Days[DayNumber])
  else
    writeln('Некорректный номер дня недели.');
end.

Как работает программа:

1. Объявляем массив Days из 7 элементов, каждый из которых имеет тип string. В этот массив мы помещаем названия дней недели по порядку.
2. Считываем с клавиатуры число DayNumber.
3. Проверяем, что введенное число находится в диапазоне от 1 до 7. Если да, то выводим соответствующий элемент массива Days, иначе выводим сообщение о некорректном номере дня недели.

При запуске программы, она будет ожидать ввода числа, а затем выведет название дня недели, соответствующее этому числу.