Оператор case of, Циклы в языке Паскаль. Написать программы: 1. Выводящую по числу день недели. Например, 1-понедельник
Оператор case of, Циклы в языке Паскаль. Написать программы: 1. Выводящую по числу день недели. Например, 1-понедельник
Гость
Ответ(ы) на вопрос:
Гостьvar i:integer;
begin
writeln('введите число от 1 до 7');
readln(i);
case i of
1:writeln('Понедельник');
2:writeln('Вторник');
3:writeln('Среда');
4:writeln('Четверг');
5:writeln('Пятница');
6:writeln('Суббота');
7:writeln('Воскресенье');
end;
readln;
end.
Не нашли ответ?
Похожие вопросы