Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.01.2007, 21:12   #11
AVer
Андрей
Форумчанин
 
Аватар для AVer
 
Регистрация: 21.11.2006
Сообщений: 457
По умолчанию

ABC это A*B*C?
ICQ: 5311314
[SIGPIC][/SIGPIC]
AVer вне форума Ответить с цитированием
Старый 15.01.2007, 21:24   #12
Baby2
 
Регистрация: 15.01.2007
Сообщений: 8
Печаль

бывают же добрые люди
на свете........ спасибо огромное.......... нажеюсь если что завтра смогу к тебе обратиться......а в среду смерть
Baby2 вне форума Ответить с цитированием
Старый 15.01.2007, 21:28   #13
Baby2
 
Регистрация: 15.01.2007
Сообщений: 8
По умолчанию

da написано так (ABC)///
я так решала
uses crt;
var
A,B,C:integer;Y:real;
begin
clrscr;
for A:=0 to 5 do
........
........
begin
Y:=sin(A*B*C);
if Y>Ymax
then
Y max:=Y;
end;
writeln ('Ymax');
readkey;
end.
не знаю есть ли в этом доля правды
Baby2 вне форума Ответить с цитированием
Старый 15.01.2007, 22:01   #14
AVer
Андрей
Форумчанин
 
Аватар для AVer
 
Регистрация: 21.11.2006
Сообщений: 457
По умолчанию

Все абсолютно верно, только не объявлена переменная Ymax. Вот полный код:
Код:
Const N = 5;
Var A,B,C:Integer;
    Ym,Y:Real;
Begin
For A:=0 to N do
For B:=0 to N do
For C:=0 to N do
Begin
Y:=Sin(A*B*C);
If Y > Ym Then Ym:=Y;
End;
WriteLn(Ym:4:5);
ReadLn;
End.
ICQ: 5311314
[SIGPIC][/SIGPIC]
AVer вне форума Ответить с цитированием
Старый 15.01.2007, 22:04   #15
Baby2
 
Регистрация: 15.01.2007
Сообщений: 8
По умолчанию

спасибо огромное.....завтра если что обращусь вечером еще..... :-))) спасибо
Baby2 вне форума Ответить с цитированием
Старый 16.01.2007, 07:26   #16
Virtson
Владимир М.
Участник клуба
 
Аватар для Virtson
 
Регистрация: 30.10.2006
Сообщений: 1,289
По умолчанию

аргумент:
0..125
градусы или радианы ?

[ ответ един : 1 ]
Берегите друг друга!
Virtson вне форума Ответить с цитированием
Старый 20.01.2007, 23:42   #17
AVer
Андрей
Форумчанин
 
Аватар для AVer
 
Регистрация: 21.11.2006
Сообщений: 457
По умолчанию

Радианы. Паскаль только в них и считает...
ICQ: 5311314
[SIGPIC][/SIGPIC]
AVer вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задачи...Паскаль Silena Помощь студентам 6 25.03.2008 16:27
Паскаль задачи Зунтук Фриланс 10 14.03.2008 17:28
Паскаль 2 задачи ProPaL Помощь студентам 3 13.11.2007 11:54
Паскаль. задачи Bagsi Помощь студентам 3 26.10.2007 20:30
4 задачи, Паскаль VirtuozZz Помощь студентам 9 26.04.2007 22:41