Предмет: Информатика,
автор: Клод16
написать программу, которая по номеру дня недели(натуральному числу от 1 до 7) выдает в качестве результата количество уроков в Вашем классе в этот день. (7 урок каждый день)
Ответы
Автор ответа:
2
Получится так:
Program p1;
Var a:integer;
Begin
Write('Введите день недели: ');
Readln(a);
case a of
1..5: Writeln('В этот день у вас 7 уроков');
6,7: Writeln('В выходной у вас нету уроков!');
else Writeln('Вы неверно ввели день!');
End;
End.
Program p1;
Var a:integer;
Begin
Write('Введите день недели: ');
Readln(a);
case a of
1..5: Writeln('В этот день у вас 7 уроков');
6,7: Writeln('В выходной у вас нету уроков!');
else Writeln('Вы неверно ввели день!');
End;
End.
Похожие вопросы
Предмет: Русский язык,
автор: gluilivti
Предмет: Русский язык,
автор: валера4711009
Предмет: Русский язык,
автор: sevaismailova2
Предмет: Химия,
автор: Ostapoviartu
Предмет: Математика,
автор: VоЛk