Предмет: Информатика,
автор: den32145
по дате рождения определить знак зодиака. обозначить d - день, и - месяц на паскале и использовать boolean 17 января
и к этому блок схему
linix5500:
какой ЯП?
Ответы
Автор ответа:
1
Ответ:
Объяснение:
var
d, m: Integer; // Переменные для дня и месяца рождения
isCapricorn, isAquarius: Boolean; // Флаги для знаков зодиака
begin
d := 17; // Задаем день рождения
m := 1; // Задаем месяц рождения
// Проверяем, является ли дата в диапазоне для Козерога (22 декабря – 19 января)
isCapricorn := (m = 12) and (d >= 22) or (m = 1) and (d <= 19);
// Проверяем, является ли дата в диапазоне для Водолея (20 января – 18 февраля)
isAquarius := (m = 1) and (d >= 20) or (m = 2) and (d <= 18);
// Выводим результаты
writeln('Козерог: ', isCapricorn);
writeln('Водолей: ', isAquarius);
end.
Похожие вопросы
Предмет: Английский язык,
автор: Аноним
Предмет: История,
автор: gudimenkosofia2
Предмет: Другие предметы,
автор: alika09gbg
Предмет: Русский язык,
автор: danil29014
Предмет: Литература,
автор: faizovasabrina2