Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
0 / 0 / 1
Регистрация: 10.01.2017
Сообщений: 7
1

Округление числа без использования функций

05.03.2013, 00:19. Просмотров 2213. Ответов 3
Метки нет (Все метки)


Здравствуйте!
Помогите, пожалуйста, округлить число до целых без использования функций. Очень срочно!
Заранее спасибо!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.03.2013, 00:19
Ответы с готовыми решениями:

Округление и выделение целой части числа без использования готовых функций
Дано действительное число х. Не используя (!) соответствующие функции Паскаль, определить: 1)...

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

Поиск чисел, которые является палиндромами как в dec так и в bin без использования функций
Добрый день, данную задачу я решил, но в процессе отладки обнаружил один неприятный баг - после...

Определение максимального и минимального числа без использования If
Вводится два вещественных числа. Определить, какое из них максимальное, а какое из них минимальное,...

3
Модератор
8403 / 4155 / 2873
Регистрация: 17.08.2012
Сообщений: 13,249
05.03.2013, 00:33 2
Число одинарной или двойной точности? И какие функции нельзя использовать?
0
0 / 0 / 1
Регистрация: 10.01.2017
Сообщений: 7
05.03.2013, 00:43 3
ну предположим число 2345,976879 его надо округлить до целых. функции типа выделения целой части или что-то подобное, или round - нельзя

Добавлено через 7 минут
Cyborg Drone, Вы можете помочь?
0
Модератор
8403 / 4155 / 2873
Регистрация: 17.08.2012
Сообщений: 13,249
05.03.2013, 01:04 4
Ещё раз. Число одинарной или двойной точности? Содержит ли порядок, т. е. может ли оно быть представлено в виде 2,345976879E3? Или, может, и числом его не называть, а просто по запятую обрезать, так, например:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
program Cutter;
 
uses CRT;
 
var a: string;
    i: integer;
begin
Write('Input number: ');
Readln(a);
for i := 1 to length(a) do
begin
  if ((a[i] = '.') or (a[i] = ',')) then
  begin
    if i = 1 then a := '0'
             else SetLength(a, i-1);
    Break;
  end;
end;
writeln(a);
Readln;
end.
Задача что-то нечётко сформулирована.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.03.2013, 01:04

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Даны натуральные числа a и b. Вычислить a^b без использования функций
Даны натуральные числа a и b. Вычислить a^b без использования функций Знаю что надо с циклом...

Вычисление квадратного корня из числа (без использования стандартных математических функций)
Напишите программу, вычисляющую квадратный корень из числа (не пользуясь стандартными...

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

Преобразовать символьное представление целого числа в целое число без использования стандартных функций
Всем доброго вечера! Народ, кто-нибудь знает как пробразовать символьное представление числа "123"...


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

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

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