Помогите решить задачку Pasal
Модераторы: Хыиуду, MOTOCoder, Medved, dr.Jekill
-
Pinkfloid88
- Сообщения: 7
- Зарегистрирован: 30 мар 2008, 12:20
Помогите пожалуйста решить задачку.
- Вложения
-
[Расширение doc было запрещено, вложение больше недоступно.]
В "Решите мне задачку". И текст желательно текстом, а не вложением
Искусство программирования - заставить компьютер делать все то, что вам делать лень.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.
В задаче косинус ЧЕГО?
[syntax='Pascal']
Program lalala;
Var X,B,Y:Real;
Begin
Writeln('Enter X and B');
Readln(X,B);
Y:=Cos({НАПИШИТЕ СЮДА ЧЕГО КОСИНУС!!!})*ln(sqrt(1+sqr(x)+exp(x*b)));
Writeln(Y);
End.
[/syntax]
[syntax='Pascal']
Program lalala;
Var X,B,Y:Real;
Begin
Writeln('Enter X and B');
Readln(X,B);
Y:=Cos({НАПИШИТЕ СЮДА ЧЕГО КОСИНУС!!!})*ln(sqrt(1+sqr(x)+exp(x*b)));
Writeln(Y);
End.
[/syntax]
Ваши руки совершили идиотскую ошибку и будут оторваны!
[OK]
[OK]
-
Игорь Акопян
- Сообщения: 1440
- Зарегистрирован: 13 окт 2004, 17:11
- Откуда: СПБ
- Контактная информация:
и впредь буду удалять темы, где задача ставится "вложением".
В связи с проявленным интересом - уехжает в РМЗ
В связи с проявленным интересом - уехжает в РМЗ
