Автор Blood-man задал вопрос в разделе Другие языки и технологии
Как изменить тип переменной? типа: var x:Real; begin integer(x); и получил лучший ответ
Ответ от Gennady[гуру]
Доброго времени суток.
Делайте вывод по формату WriteLn(X:10:0); или округляйте Round(x). Еще можно выделить целую часть Trunc(x); Значения, возвращаемые функциями Round и Trunc имеют целочисленный тип.
То, что вы написали, называется приведение типов и позволяет прочесть переменную Х как целое число, но поскольку действительное число хранится в виде нормализованной мантиссы и порядка, то результат, полученный после такого приведения не будет иметь ничего общего с первоначальным значением.
Удачи!
Ответ от Jess[активный]
Язык-то какой? Паскаль? Впрочем, не помню, чтобы там можно было изменять типы переменных.. . Если вас волнуют знаки после запятой, если функции, выводящие целую часть. Написанное вами "integer(x)" изменит тип лишь для текущей операции, но переменная так и останется реальной.
Язык-то какой? Паскаль? Впрочем, не помню, чтобы там можно было изменять типы переменных.. . Если вас волнуют знаки после запятой, если функции, выводящие целую часть. Написанное вами "integer(x)" изменит тип лишь для текущей операции, но переменная так и останется реальной.
Ответ от Alex[гуру]
Сделай FloatToStr а потом StrToInt
Сделай FloatToStr а потом StrToInt
Ответ от Ruslan Nurislamov[гуру]
Нет скорей всего проблемы.. . Форматированный вывод пробуйте.
Нет скорей всего проблемы.. . Форматированный вывод пробуйте.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Как изменить тип переменной? типа: var x:Real; begin integer(x);
спросили в Секущиеся
помогите решить в turbo pascal уравнение: arctg(x-1)+2*x=0 методом секущих с точностью 0,0001
Методом секущих хорд наверно имелось в виду?
program XORDA;
function
подробнее...
помогите решить в turbo pascal уравнение: arctg(x-1)+2*x=0 методом секущих с точностью 0,0001
Методом секущих хорд наверно имелось в виду?
program XORDA;
function
подробнее...
метод простой итерации
На Visual Fox Pro х.з. (его где вообще применяют?). А вот на паскале решение
подробнее...
спросили в Randomness X/1999
Программа создания случайных чисел
сории.. . ты модуль переменуй!! ! c randomiz в любое другоее имя
и x сделай real, или double
подробнее...
Программа создания случайных чисел
сории.. . ты модуль переменуй!! ! c randomiz в любое другоее имя
и x сделай real, или double
подробнее...
спросили в Mega Man
програмирование в делфи отсортировать массив по убыванию min в конец
Доброго времени суток.
Поскольку метод сортировки не указан, получайте пузырьком.
програмирование в делфи отсортировать массив по убыванию min в конец
Доброго времени суток.
Поскольку метод сортировки не указан, получайте пузырьком.
Вопрос по Delphi 7. Функция VarIsNumeric.
var
x: Real;
try
x := StrToFloat(Edit1.Text);
except
x := 0; // не
подробнее...
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:
Метод простых итераций в Pascal
примени эту программу себе
{x+lg(1+x)=1,5 }
program lab5_2;
uses crt;
var
подробнее...
метод деления отрезка по полам
метод деления отрезка пополам заключается в следующем
есть точка, где какая-то непрерывная на
подробнее...
спросили в Integrals
помогите сделать прогу в "с++"!!!тема "численное интегрирование функции. метод гаусса"
вот, нашла программу на паскале. надеюсь, вам будет не очень сложно вамостоятельно перевести ее в
подробнее...
помогите сделать прогу в "с++"!!!тема "численное интегрирование функции. метод гаусса"
вот, нашла программу на паскале. надеюсь, вам будет не очень сложно вамостоятельно перевести ее в
подробнее...
спросили в Randomness
Паскаль. даны 3 числа. вывести в порядке убывания. воспользоваться вот этой программой см внутри. помогите пожалуйста!!!
вот программа сортирующая n чисел
uses crt;
const nmax=100;
var a:array[1..nmax] of
подробнее...
Паскаль. даны 3 числа. вывести в порядке убывания. воспользоваться вот этой программой см внутри. помогите пожалуйста!!!
вот программа сортирующая n чисел
uses crt;
const nmax=100;
var a:array[1..nmax] of
подробнее...
Составить программу на языке Pascal,численно решающую уравнение с одной неизвестной методом касательных и методом хорд.
Касательных:
PROGRAM Newton;
FUNCTION F(x:real):real;
BEGIN
F :=
подробнее...
Ошибка "Ожидался порядковый тип", 4 строка.
var
i:integer;
johnsilver
(11461)
зачем трогать 6-ую строчку? тебе
подробнее...
Можно ли вычислить корень кубический в турбо паскале?
можно такой простой штукой, например, тебе надо х присвоить корень кубический из
подробнее...
Как на языке Паскаль число возвести в степень? Значек "^" не срабатывает.
X в степени Y можно заменить выражением
подробнее...
Помогите с задачей по информатике. Срочно прошу.
Не хватает либо цены за билет эконом класса
либо цены за билет бизнес класса.
Uses
подробнее...
Как в Pascal пишется тангенс?
Есть в паскале функция тангенс.
Не помню, но помоему tan(х) пишется.. .
подробнее...