Написать программу, которая в зависимости от порядкового номера дня недели 1 ... 7 выводит на экран его название (понедельник, вторник и тд.)

Question

Информатика

Матрона

10 июня, 00:28

Написать программу, которая в зависимости от порядкового номера дня недели 1 ... 7 выводит на экран его название (понедельник, вторник и тд.)

+3

Ответы (1)

Знаете ответ на вопрос?

Гана · Answer 1

Var

d: integer;

repeat

readln (d) ;

case d of

1: writeln ('Понедельник') ;

2: writeln ('Вторник') ;

3: writeln ('Среда') ;

4: writeln ('Четверг') ;

5: writeln ('Пятница') ;

6: writeln ('Суббота') ;

7: writeln ('Воскресенье') ;

else writeln ('Конец работы!')

end;

until (d7)

end.