Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
qb-noob
1 / 1 / 2
Регистрация: 18.04.2011
Сообщений: 30
#1

Выделить дробную часть числа и определить её первую цифру после запятой - Pascal ABC

18.10.2011, 22:49. Просмотров 885. Ответов 2
Метки нет (Все метки)

1) Дано число с дробной частью, например: 25.6782. Выделить дробную часть и определить её 1-ю цифру после запятой.
2)Определить, попадает ли точка с заданными координатами X, Y в заштрихованную область (условные операторы не применять)
http://www.cyberforum.ru/pascalabc/thread398576.html
0
Миниатюры
Выделить дробную часть числа и определить её первую цифру после запятой  
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.10.2011, 22:49
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Выделить дробную часть числа и определить её первую цифру после запятой (Pascal ABC):

Определить первую цифру дробной части заданного вещественного числа
Помогите пожалуйста решить Написать алгоритм, определяющий первую цифру...

Дано натуральное число. Определить первую и последнюю цифру числа n
Дано натуральное число n(n<=100).Определить первую и последнюю цифру числа n.

Найти дробную часть вещественного числа х, если целые числа вводимые с экрана положительные; х=y/z
Hужно использовать оператор "если". Застрял на ней. Помогите чем сможете.

Вывести дробную часть числа в виде натурального числа
Помогите написать программу которая в дробном числе дробную его часть выводит в...

Найти дробную часть вещественного числа
Уважаемые, срочно нужна помощь! 2) Найти дробную часть вещественного числа Х,...

2
Somebody
2799 / 1610 / 251
Регистрация: 03.12.2007
Сообщений: 4,211
Завершенные тесты: 3
18.10.2011, 23:44 #2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
fr := frac(f);
d1 := trunc(fr * 10);
Pascal
1
inside := (x >= -1) and (x <= 1) and (y >= -1) and (y <= 1);
1
Puporev
Модератор
54132 / 41765 / 28876
Регистрация: 18.05.2008
Сообщений: 98,299
19.10.2011, 13:33 #3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

2 даже так

Pascal
1
inside := (abs(x)<=1) and (abs(y)<= 1);
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.10.2011, 13:33
Привет! Вот еще темы с решениями:

Как откинуть дробную часть вещественного числа.
задача такая &quot;проверить выскзывание дано целое трёх значное число &quot; а если оно...

Программа не переводит дробную часть числа из десятичной сс в другую
почему не переводит дробную часть числа из десятичной сс в другую сс? ...

Из вещественного числа выделить целую и дробную части и сохранить их в переменные целого типа
Составить процедуру, которая из вещественного числа выделяет целую и дробную...

Найти первую цифру , последнюю цифру, количество цифр и сумму цифр числа
Дано натуральное число n. Найти первую цифру , последнюю цифру, количество...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru