|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
24.01.2009, 15:11 | #1 |
Регистрация: 25.12.2008
Сообщений: 8
|
помогите найти ошибку!
z,b,y,Otvet1:integer;
x:string; if b <> 10 Then Begin for y:=z downto 0 do Otvet1:=x[y] * (exp(b * ln(y)));end Выдает ошибку несоответствие типов. подскажите где ошибка и как исправить.
"Наша жизнь такова, какой делают ее наша мысли."
|
24.01.2009, 15:14 | #2 |
Форумчанин
Регистрация: 06.12.2008
Сообщений: 613
|
умножение на экспоненту чего-то там - всегда real, так что Otvet1 сделайте real; во-вторых, только сейчас заметил, вы умножаете число на символ - что вы хотите получить на выходе это неверно - поэтому если это не исправить, мое первое замечание не в счет!
|
24.01.2009, 15:28 | #3 |
Регистрация: 25.12.2008
Сообщений: 8
|
как исправить
"Наша жизнь такова, какой делают ее наша мысли."
|
24.01.2009, 15:32 | #4 |
Пользователь
Регистрация: 25.12.2008
Сообщений: 39
|
.
z,b,y:integer;
Otvet1:real; x:string; |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
помогите найти ошибку | LyaLyaLya | Помощь студентам | 6 | 15.12.2008 20:59 |
Помогите найти ошибку ( с++ ) | JOFRIF | Помощь студентам | 10 | 23.05.2008 14:34 |
Помогите найти ошибку | N!ckeL | Общие вопросы Delphi | 9 | 05.05.2008 14:15 |
Помогите найти ошибку | JOFRIF | Помощь студентам | 8 | 22.04.2008 14:22 |