|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
04.11.2008, 18:44 | #1 |
Пользователь
Регистрация: 19.10.2008
Сообщений: 24
|
Сложные цикли и разветвления.
Получить таблицу значений функции U найти Umin.Переменная X изменяется от -1 до 0.6 с шагом 0.8,переменная Y изменяется от 0 до 0.6 с шагом 0.2.
|
04.11.2008, 18:54 | #2 |
Пользователь
Регистрация: 19.10.2008
Сообщений: 24
|
у кого есть какие предложения по каким цыклам решать while/for/if/repeat/......????
|
06.11.2008, 10:53 | #3 |
Пользователь
Регистрация: 19.10.2008
Сообщений: 24
|
program 1;
var x,y,u:real; begin x:=-1; y:=0 repeat if z>=1 then U:=cos(z)/sin(z)+sin(x)*sin(x) else u:=absln(x)+Sqrt(abs(x-z)); writeln('x=' ,x:10:6,'y=' ,y:10:6,'u=' ,u:10:6); x:=x+0.8; y:=y+0.6; дальше не знаю как .....((( |
06.11.2008, 11:21 | #4 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
На основе ваших прикидок:
Код:
|
06.11.2008, 11:58 | #5 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Хоть и не студент, но поправлю. Все верно, кроме того, что в Паскале нет функции Power. И еще надо минимальное значение. Поэтому будет так:
Код:
Последний раз редактировалось puporev; 06.11.2008 в 12:08. Причина: добавил минимум |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Какие языки (системы разработки) имеют встроенные сложные операции над объектами? | asmc | Общие вопросы C/C++ | 1 | 26.06.2008 09:01 |
Сложные SQL запросы или хранимые процедуры! | Killer_djon | БД в Delphi | 17 | 25.03.2008 12:10 |
задача на сложные действия со строками | Converse | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 03.01.2008 07:34 |