IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

2 страниц V < 1 2  
 Ответить  Открыть новую тему 
> Помогите отредактировать программу, 207 ошибка
Sane
сообщение 1.12.2005 12:35
Сообщение #21


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Мужской
Реальное имя: Женя

Репутация: -  0  +


ясно, поймите меня правильно я 2 дня назад только начал изучать паскаль. И ваши советы приму во внимание. Спасибо за помощь.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Sane
сообщение 2.12.2005 10:30
Сообщение #22


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Мужской
Реальное имя: Женя

Репутация: -  0  +


Надо протабулировать функцию и аргументы но не при всех a она работает, если нет то выдаёт 207 ошибку. Что надо здесь добавить ? (исх. функция с аргументами в файле)
program tabulirovanie;

uses crt;
var y,a,b,x,t:real;
begin

begin
writeln ('enter ishodniye danniye');
write ('a=');readln (a);
x:=1;
repeat
t:=2;
repeat
y:=sqrt((t+(1)*exp(-a*x*t))*cos(t-a));
writeln ('x=',x:2:1,' t=',t:2:1,' y=',y:4:5);
t:=t+0.3;
until (t>3);
x:=x+0.2;
until (x>2.1)
end;
readln;
clrscr;
end.


М
Тег Кода надо не только открывать, но и закрывать wink.gif
volvo



Сообщение отредактировано: volvo - 8.11.2006 13:09


Эскизы прикрепленных изображений
Прикрепленное изображение
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 2.12.2005 10:40
Сообщение #23


Гость






Цитата
Что надо здесь добавить ?

Функцию правильно записать:
y:=sqrt(t+1)*exp(-a*x*t)*cos(t-a);


Все нормально работает... Только лишний Begin .. End есть в программе...
 К началу страницы 
+ Ответить 
Sane
сообщение 2.12.2005 10:42
Сообщение #24


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Мужской
Реальное имя: Женя

Репутация: -  0  +


попробуйте при а=5
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 2.12.2005 10:43
Сообщение #25


Гость






Здесь по-твоему, удаленный отладчик? А сам ты попробовать не хотел бы? mad.gif
 К началу страницы 
+ Ответить 
Sane
сообщение 2.12.2005 10:56
Сообщение #26


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Мужской
Реальное имя: Женя

Репутация: -  0  +


Нет я просто непонимаю что мне надо сделать чтоб она не выдавала ошибку. При a=3 она работает а при a=5 нехочет. Почему так ? Просто если несложно объясните.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 2.12.2005 11:00
Сообщение #27


Гость






Цитата
Просто если несложно объясните.

Сложно объяснить того, что НЕ происходит... У меня вот это:
Цитата
enter ishodniye data:
a = 5
x=1.0 t=2.0  y=-0.00008
x=1.0 t=2.3  y=-0.00002
x=1.0 t=2.6  y=-0.00000
x=1.0 t=2.9  y=-0.00000
x=1.2 t=2.0  y=-0.00001
x=1.2 t=2.3  y=-0.00000
x=1.2 t=2.6  y=-0.00000
x=1.2 t=2.9  y=-0.00000
x=1.4 t=2.0  y=-0.00000
x=1.4 t=2.3  y=-0.00000
x=1.4 t=2.6  y=-0.00000
x=1.4 t=2.9  y=-0.00000
x=1.6 t=2.0  y=-0.00000
x=1.6 t=2.3  y=-0.00000
x=1.6 t=2.6  y=-0.00000
x=1.6 t=2.9  y=-0.00000
x=1.8 t=2.0  y=-0.00000
x=1.8 t=2.3  y=-0.00000
x=1.8 t=2.6  y=-0.00000
x=1.8 t=2.9  y=-0.00000
x=2.0 t=2.0  y=-0.00000
x=2.0 t=2.3  y=-0.00000
x=2.0 t=2.6  y=-0.00000
x=2.0 t=2.9  y=-0.00000
программа выдала при A=5... А какого ты от нее результата ждешь?
 К началу страницы 
+ Ответить 
Sane
сообщение 2.12.2005 11:08
Сообщение #28


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Мужской
Реальное имя: Женя

Репутация: -  0  +


у меня вот так:


Эскизы прикрепленных изображений
Прикрепленное изображение
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 2.12.2005 11:23
Сообщение #29


Гость






Sane, ну я же тебе сказал, что сделать в посте №23:
Цитата
Функцию правильно записать:


Нет, ты опять по-своему все делаешь... Ну, как знаешь.
 К началу страницы 
+ Ответить 
Sane
сообщение 2.12.2005 11:29
Сообщение #30


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Мужской
Реальное имя: Женя

Репутация: -  0  +


всё ок. Извени просто изменения не записал и закрыл паскаль и запустил потом. Спасибо за помощь.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

2 страниц V < 1 2
 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 20.07.2025 14:00
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"