Question

30 баллов. PascalABC.NET Всем известно, что в неделе 7 дней: понедельник (Monday), вторник (Tuesday), среда (Wednesday), четверг (Thursday), пятница (Friday), суббота (Saturday) и воскресенье (Sunday).По номеру дня недели следует определить англоязычный вариант его записи.Входные данныеВходной файл INPUT.TXT содержит целое число N – номер дня недели (1 ≤ N ≤ 7).Выходные данныеВ выходной файл OUTPUT.TXT выведите ответ на задачу с заглавной буквы.

Answer 1

Привет!

var

x:integer;

begin

readln(x);

case x of

1:writeln('Monday');

2:writeln('Tuesday');

3:writeln('Wednesday');

4:writeln('Thursday');

5:writeln('Friday');

6:writeln('Saturday');

7:writeln('Sunday');

end;

end.

Answer 2

Вот решение задачи на языке PascalABC.NET:

cssCopy code
var
  n: integer;
begin
  readln(n);
  case n of
    1: writeln('Monday');
    2: writeln('Tuesday');
    3: writeln('Wednesday');
    4: writeln('Thursday');
    5: writeln('Friday');
    6: writeln('Saturday');
    7: writeln('Sunday');
  end;
end.

В этом решении мы считываем число n из входного файла, затем используем оператор case для проверки значения n и выводим соответствующий день недели на английском языке в выходной файл. Обратите внимание, что каждый вариант ответа должен начинаться с заглавной буквы, как требуется в задании.