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

Question

Гаврила

17 ноября, 17:40

+1

Ответы (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.