Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
  |
| логическое выражение |
| Олег |
Сообщение
#1
|
|
Гость  |
Пенсионерами могут быть женщины не моложе 55 лет и мужчины не моложе 60,
записать на языке Паскаль логическое выражение, которое принимает значение true или false в зависимости от того является ли пенсионером сотрудник. Использовать обозначения: P-для пола работника (может принимать значения 'м' или 'ж') age -для возраста работника. |
 
|
|
| Altair |
Сообщение
#2
|
 Ищущий истину  Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация:  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 |
Сообщение
#3
|
|
- Группа: Пользователи Сообщений: 480 Пол: Мужской Репутация: 4 |
Цитата А мой возраст занимает пока 1 байт. А мой в 4 бита умещается :D -------------------- бб
|
|
|
|
| Altair |
Сообщение
#4
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата А мой в 4 бита умещается Так, 2^4 = 16. FreeMan, тебе 16 лет? Ага, да точно. А мой спокойно тогда уместиться в 5 бит. Что-бы мессага не была офттопом, придется рассказать что-то. Ага, вот. Как все это считать: Итак, бит может иметь значения 0 или 1. Если есть n бит, то что-бы узнать сколько можно закодировать, возводим 2 в степень n. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| FreeMan |
Сообщение
#5
|
|
- Группа: Пользователи Сообщений: 480 Пол: Мужской Репутация: 4 |
Мне 16. Но
Цитата Если есть n бит, то что-бы узнать сколько можно закодировать, возводим 2 в степень n. Если есть n бит то что-бы узнать сколько можно закодировать, возводим 2 в степень n и отнимаем единицу. Число 1111b=15. Опс. Я вырос на один бит. Вот блин. Мне тоже надо 5 бит. :D -------------------- бб
|
|
|
|
| Altair |
Сообщение
#6
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Да, я не подумал тоже сначал, что начинается с нуля...
выходит макс из 4 бит = 15. Ну 5 бит все-равно хватит! -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| Олег |
Сообщение
#7
|
|
Гость |
Цитата(Олег @ 3.10.04 22:36) Пенсионерами могут быть женщины не моложе 55 лет и мужчины не моложе 60, записать на языке Паскаль логическое выражение, которое принимает значение true или false в зависимости от того является ли пенсионером сотрудник. Использовать обозначения: P-для пола работника (может принимать значения 'м' или 'ж') age -для возраста работника. Спасибо большое за программу ! Я сегодня разобрался как ее написать. Вообще то я сделал ее по-другому немного, как-то попроще наверное. Очень хорошо что есть такие как вы! |
|
|
|
| Altair |
Сообщение
#8
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата как-то попроще наверное. не занижайте свои достижения. не проще, а понятнее для вас! Ибо каждый пишет код, прежде всего понятный ему самому! Цитата Очень хорошо что есть такие как вы! Это замечательные слова! мы постараемся и впредь такими оставаться! Будем стараться во всяком случае! заходите еще. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
|
|
Текстовая версия | 5.05.2024 22:21 |
