Оператор case of, Циклы в языке Паскаль. Написать программы: 1. Выводящую по числу день недели. Например, 1-понедельник

Question

Информатика

Александрушка

27 февраля, 19:18

Оператор case of, Циклы в языке Паскаль. Написать программы: 1. Выводящую по числу день недели. Например, 1-понедельник

+3

Ответы (1)

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

Николаха · Answer 1

Var i:integer;

begin

writeln ('введите число от 1 до 7') ;

readln (i) ;

case i of

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

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

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

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

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

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

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

end;

readln;

end.