Форум программистов, компьютерный форум, киберфорум
Delphi
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.78/18: Рейтинг темы: голосов - 18, средняя оценка - 4.78
5 / 5 / 1
Регистрация: 01.01.2011
Сообщений: 147
1

extended and int

15.05.2011, 09:30. Просмотров 3764. Ответов 4
Метки нет (Все метки)

Вот я всяко-разно пытался перевести переменные, даже это не работает:
Delphi
1
2
3
4
5
6
7
8
9
10
11
procedure TForm2.sButton1Click(Sender: TObject);
var
  b1, R: integer;
  b2: string;
  b3: extended;
begin
  b2:=inttostr(n.Value);
  b3:=strtofloat(b2);
  b1:=E.Value-U.Value*b3;
  sLabel6.Caption:=floattostr(b1/I.Value);
end;
Вроде даже через стринг провожу, всё равно ругается что b3 это типа integer.
На строке b1:=E.Value-U.Value*b3; : Incompatible types: Integer and Extended.
E.Value и U.Value Extended, b3 это extended, n.Value: integer;
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.05.2011, 09:30
Ответы с готовыми решениями:

Int и frac не работают для extended
Привет всем, у меня в курсовой нужно переводить10-ые чисила в 2-ую СС с расширенной точностью.(ну...

Какая из этих функций int Q(int w) int W(int y,int u,int i) сработает быстрее?
Если есть 2 функции(простые или перегруженные) к примеру Q(int w) int W(int y,int u,int i)или int...

Не работает перегрузка индексного оператора [], вместо [int][int] почему то нужно ставить [0][int][int]
#include<iostream> #include<string> #include<vector> #include<algorithm> #include<ctime>...

Error LNK2019: unresolved external symbol "public: __thiscall Vector<int>::Vector<int>(int,int,int)" (?0?$Vec
Вот есть заголовочный файл // Заголовочный файл Vector.h #ifndef VECTOR_H #define VECTOR_H ...

4
480 / 253 / 51
Регистрация: 30.06.2010
Сообщений: 651
15.05.2011, 09:50 2
ругается, что b1 типа integer , а не b3 !
вы присваиваете b1 (которое интеджер) значение, рассчитываемое из евалью и ювалью (которые как раз екстендед ) !!!
округляйте перед присвоением функциями round, trunc, либо объявите b1 : integer;
и всё будет )
0
5 / 5 / 1
Регистрация: 01.01.2011
Сообщений: 147
19.05.2011, 03:26  [ТС] 3
Дык мне то надо с дробной частью
0
2449 / 1753 / 371
Регистрация: 11.09.2009
Сообщений: 6,474
19.05.2011, 04:16 4
Цитата Сообщение от Viper27 Посмотреть сообщение
ругается что b3 это типа integer.
На строке b1:=E.Value-U.Value*b3;
Результат вычисления E.Value-U.Value*b3 - Extended. Его нельзя записать в целый тип integer. Вам уже сказали.

Цитата Сообщение от Viper27 Посмотреть сообщение
Дык мне то надо с дробной частью
Delphi
1
2
3
4
procedure TForm2.sButton1Click(Sender: TObject);
begin
sLabel6.Caption:= floatToStr((E.Value-U.Value*n.Value)/I.Value);
end;
0
480 / 253 / 51
Регистрация: 30.06.2010
Сообщений: 651
19.05.2011, 08:51 5
мда, я допустил "описку", надо было написать "либо объявите b1: extended"
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.05.2011, 08:51

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

[C++ Error] Unit2.cpp(22): E2034 Cannot convert 'int (*)(int,int *)' to 'int'
Всем привет! Пожалуйста , помогите , почему выдает ошибку Unit2.cpp(22): E2034 Cannot convert 'int...

Dictionary<int,List<int>> и IReadOnlyDictionary<int,IReadOnlyList<int>>
Народ, столкнулся с такой ситуацией. Есть Переменная Dictionaty&lt;int,List&lt;int&gt;&gt; Dic = new...

void _fastcall TForm1::Vector(int x0, int y0, int a, int l);
//--------------------------------------------------------------------------- #include...

[C++ Error] Unit1.cpp(50): E2316 '_fastcall TForm1::Vector(int,int,int,int)' is not a member of 'TForm1'
есть событие набраное в Unit.cpp, при запуске программы выбивается ошибка: Unit1.cpp(50): E2316...


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

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

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