Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ логорифм

Автор: fox 3.06.2007 0:49

решите (2*с+lg(d)*51)/(d-a-1) надо решить чтоб была хоть одна подпрограмма.Здесь надо вычислить это арифметическое выражение для данных в форматах real (переменные a,b) и integer все остальные переменые.

Автор: Артемий 3.06.2007 0:53

Все у тебя надо!Свою дублированную тему не читал?

Цитата
переменные a,b

а где там b задействовано?..

Автор: fox 3.06.2007 0:54

Цитата(Артемий @ 2.06.2007 20:53) *

Все у тебя надо!Свою дублированную тему не читал?
мне её закрыли за неинформативность

Автор: klem4 3.06.2007 1:00

Цитата
мне её закрыли за неинформативность


С неинформативностью с грехом пополам ты вроде разобрался, а вот с приказным тоном не особо. Здесь тебе никто ничего не должен, сам-то хоть пробовал сделать ?

Автор: fox 3.06.2007 12:32

Цитата(klem4 @ 2.06.2007 21:00) *

С неинформативностью с грехом пополам ты вроде разобрался, а вот с приказным тоном не особо. Здесь тебе никто ничего не должен, сам-то хоть пробовал сделать ?

пробевал но не получилось а чего незнаю а за приказной тон извените просто практика прикумарила задачи тяжёлые. wacko.gif

Автор: Артемий 3.06.2007 12:55

Вот и покажи что напробовал, а мы исправим..

Автор: fox 3.06.2007 13:52

Цитата(Артемий @ 3.06.2007 8:55) *

Вот и покажи что напробовал, а мы исправим..

хорошо
а как в рамачку прогу вывести

Автор: Артемий 3.06.2007 14:05

Теги [code][code]
(перед вторым code слэш поставь)
Прочти второй пункт правил раздела.

Автор: fox 3.06.2007 14:07

[quote name='Артемий' post='105160' date='3.06.2007 10:05']
Теги

Код
[code]
[/quote]
спасибо поня ша накатаю :wink:  :wink:

[size=1][b]Добавлено через [/b] 18 мин. [/size]
вот чё я наделал:
[code=pas]program ei3;
var
c,k:integer;
a,d:real;
procedure nod(c,d,a:integer;var k:integer);
begin
k:=(2*c+lg(d)*51)/(d-a-1);
writeln(выражение равно k', k);
readln(k);
end;
begin
writeln('ввести a,d,c');
read(a,d,c);
nod(c,d,a,k);
readln;
end.

Автор: Артемий 3.06.2007 18:51

procedure nod(c,d,a:integer;var k:integer);

Ты ж сам говорил,что а и d должны быть real!

Добавлено через 1 мин.
k:=(2*c+lg(d)*51)/(d-a-1);

В pascal нужно ln(d)

Автор: fox 3.06.2007 19:36

а как из lg в ln перевести nea.gif

Автор: мисс_граффити 3.06.2007 20:00

fox, не надо по 10 одинаковых сообщений отправлять.
Думаешь, модераторы получат удовольствие от удаления их?

чисто математически:
lg(x)=ln(x)/ln(10)

Автор: Гость 5.06.2007 0:35

Цитата(мисс_граффити @ 3.06.2007 16:00) *

fox, не надо по 10 одинаковых сообщений отправлять.
Думаешь, модераторы получат удовольствие от удаления их?

чисто математически:
lg(x)=ln(x)/ln(10)

спасибо

Автор: fox 5.06.2007 0:37

а задачку сможеш решить