Напишите программу, которая по номеру дня недели выводит "рабочий день", если это день с понедельника по пятницу, или "суббота" или "воскресенье". язык паскаль.
231
344
Ответы на вопрос:
var day: integer;
begin
readln(day);
case day of
1..5: writeln('рабочий день');
6: writeln('суббота');
7: writeln('воскресенье');
end;
end.
fpc 3.0.0
Акак следующая программа выдаст ответ, если она неправильно написана? ))
Популярно: Информатика
-
Даниил35802.09.2021 15:42
-
GiraAronEchwik06.06.2021 05:47
-
Tribbl220109.07.2021 09:48
-
Asian2811.12.2020 00:05
-
matyusha4710.03.2020 04:33
-
elenachemiris05.03.2023 05:05
-
mariyburova200125.04.2021 07:38
-
Arinaiv126.01.2021 13:36
-
Hiccjhcvkjxg28.03.2022 18:41
-
Dec3mber06.05.2022 13:48