Program day; var x:byte;beginwriteln('Введите число, чтобы узнать, какому дню недели оно соответствует:');Readln(x);Case x of0: writeln('Такого дня недели не существует.');1: writeln('Понедельник.');2: writeln('Вторник.');3: writeln('Среда.');4: writeln('Четверг.');5: writeln('Пятница.');6: writeln('Суббота.');7: writeln('Воскресенье.');8..1000: writeln('еправильный ввод.');end;end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
