Следующая программа, содержащая, по крайней мере, одну ошибку, после устранения ошибок должна определять день недели для произвольного дня месяца. В ней считается, что первое число данного месяца — понедельник. Укажите все ошибки. var d,w:integer;

begin readln(d);

w:=d div 7;

case w of

1:writeln(’понедельник’);

2:writeln(’вторник’);

3:writeln(’среда’);

4:writeln(’четверг’);

5:writeln(’пятница’);

6:writeln(’суббота’);

7:writeln(’воскресенье’);

end

end.

Выберите один или несколько ответов:
a. 7:writeln(’воскресенье’);
b. readln(d);
c. 4:writeln(’четверг’);
d. w:=d div 7;