Какой будет результат выполнения данного фрагмента программы для значения переменной n : var n: byte; begin write
Какой будет результат выполнения данного фрагмента программы для значения переменной "n":
var n: byte;
begin
write (1 – den 7 – ge deyingi sandi engiz);
read(n);
case n of
1: Writeln(‘Duysenbi’);
2: Writeln(‘Seysenbi’);
3: Writeln(‘Sarsenbi’);
4: Writeln(‘Beysenbi’);
5: Writeln(‘Juma’);
6: Writeln(‘Senbi’);
7: Writeln(‘Jekseni’);
else writeln(‘Duris emes’);
end.
a) Какие времена года?
b) Какие дни недели?
c) Какие месяцы?
30.06.2024 19:54
begin
write (1 – den 7 – ge deyingi sandi engiz);
read(n);
case n of
1: Writeln(‘Duysenbi’);
2: Writeln(‘Seysenbi’);
3: Writeln(‘Sarsenbi’);
4: Writeln(‘Beysenbi’);
5: Writeln(‘Juma’);
6: Writeln(‘Senbi’);
7: Writeln(‘Jekseni’);
else writeln(‘Duris emes’);
end.
a) Какие времена года?
b) Какие дни недели?
c) Какие месяцы?
Объяснение:
Данный фрагмент программы представляет собой простую программу на языке Pascal. Она предлагает пользователю ввести число от 1 до 7, после чего выводит соответствующий день недели на русском языке. Если введенное число не находится в диапазоне от 1 до 7, будет выведено сообщение "Duris emes" (переводится как "Неправильно").
a) В данном случае, каждое число от 1 до 7 соответствует одному дню недели:
- 1: Duysenbi (понедельник)
- 2: Seysenbi (вторник)
- 3: Sarsenbi (среда)
- 4: Beysenbi (четверг)
- 5: Juma (пятница)
- 6: Senbi (суббота)
- 7: Jekseni (воскресенье)
b) Дни недели:
- 1: понедельник (Duysenbi)
- 2: вторник (Seysenbi)
- 3: среда (Sarsenbi)
- 4: четверг (Beysenbi)
- 5: пятница (Juma)
- 6: суббота (Senbi)
- 7: воскресенье (Jekseni)
c) В данном фрагменте программы нет информации о месяцах. Только дни недели представлены.
Дополнительное упражнение:
Введите число от 1 до 7 и определите соответствующий день недели с использованием данного фрагмента программы.