Следующая программа, содержащая, по крайней мере, одну ошибку, после устранения ошибок должна определять день недели для произвольного дня месяца. В ней считается, что первое число данного месяца — понедельник. Укажите все ошибки. 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;
ПОМОГИТЕ
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;
ПОМОГИТЕ
More Questions From This User See All