в паскале: По номеру дня недели вывести на печать рабочий это день или выходной, считая выходными субботу и воскресение

Question

Святослав

6 февраля, 12:52

+5

Ответы (1)

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

Сарра · Answer 1

Uses crt;

var i, j:integer;

begin

readln (i) ;

case i of

1,2,3,4,5 : writeln ('Рабочий') ;

6,7: writeln ('Выходной') ;

end;

end.