 логическое выражение |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Олег |
 3.10.2004 22:36
Сообщение
#1
|
|
Гость  |
Пенсионерами могут быть женщины не моложе 55 лет и мужчины не моложе 60,
записать на языке Паскаль логическое выражение, которое принимает значение true или false в зависимости от того является ли пенсионером сотрудник. Использовать обозначения: P-для пола работника (может принимать значения 'м' или 'ж') age -для возраста работника. |
 
|
|
  |
Ответов(1 - 7)
| Altair |
4.10.2004 5:43
Сообщение
#2
|
 Ищущий истину  Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация:  45  |
А мой возраст занимает пока 1 байт.
 Код type Chel = record; P:char; age:byte end; var a:Chel; pensioner:boolean; begin readln(a.p,a.age); If ((p='м') and (age>60)) or ((p='ж') and (age>55)) then pensioner:=true else pensioner:=false; end. Разберешься. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
   |
|
| FreeMan |
4.10.2004 16:22
Сообщение
#3
|
|
- Группа: Пользователи Сообщений: 480 Пол: Мужской Репутация: 4 |
Цитата А мой возраст занимает пока 1 байт. А мой в 4 бита умещается :D -------------------- бб
|
|
|
|
| Altair |
4.10.2004 17:30
Сообщение
#4
|
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата А мой в 4 бита умещается Так, 2^4 = 16. FreeMan, тебе 16 лет? Ага, да точно. А мой спокойно тогда уместиться в 5 бит. Что-бы мессага не была офттопом, придется рассказать что-то. Ага, вот. Как все это считать: Итак, бит может иметь значения 0 или 1. Если есть n бит, то что-бы узнать сколько можно закодировать, возводим 2 в степень n. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| FreeMan |
4.10.2004 17:36
Сообщение
#5
|
|
- Группа: Пользователи Сообщений: 480 Пол: Мужской Репутация: 4 |
Мне 16. Но
Цитата Если есть n бит, то что-бы узнать сколько можно закодировать, возводим 2 в степень n. Если есть n бит то что-бы узнать сколько можно закодировать, возводим 2 в степень n и отнимаем единицу. Число 1111b=15. Опс. Я вырос на один бит. Вот блин. Мне тоже надо 5 бит. :D -------------------- бб
|
|
|
|
| Altair |
4.10.2004 18:04
Сообщение
#6
|
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Да, я не подумал тоже сначал, что начинается с нуля...
выходит макс из 4 бит = 15. Ну 5 бит все-равно хватит! -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| Олег |
 4.10.2004 21:27
Сообщение
#7
|
|
Гость |
Цитата(Олег @ 3.10.04 22:36) Пенсионерами могут быть женщины не моложе 55 лет и мужчины не моложе 60, записать на языке Паскаль логическое выражение, которое принимает значение true или false в зависимости от того является ли пенсионером сотрудник. Использовать обозначения: P-для пола работника (может принимать значения 'м' или 'ж') age -для возраста работника. Спасибо большое за программу ! Я сегодня разобрался как ее написать. Вообще то я сделал ее по-другому немного, как-то попроще наверное. Очень хорошо что есть такие как вы! |
|
|
|
| Altair |
4.10.2004 21:57
Сообщение
#8
|
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата как-то попроще наверное. не занижайте свои достижения. не проще, а понятнее для вас! Ибо каждый пишет код, прежде всего понятный ему самому! Цитата Очень хорошо что есть такие как вы! Это замечательные слова! мы постараемся и впредь такими оставаться! Будем стараться во всяком случае! заходите еще. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 27.07.2025 3:58 |