![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
fox |
![]() ![]()
Сообщение
#1
|
Гость ![]() |
решите (2*с+lg(d)*51)/(d-a-1) надо решить чтоб была хоть одна подпрограмма.Здесь надо вычислить это арифметическое выражение для данных в форматах real (переменные a,b) и integer все остальные переменые.
|
Артемий |
![]()
Сообщение
#2
|
![]() Помощник капитана ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 601 Пол: Мужской Реальное имя: Артем Репутация: ![]() ![]() ![]() |
Все у тебя надо!Свою дублированную тему не читал?
Цитата переменные a,b а где там b задействовано?.. Сообщение отредактировано: Артемий - 2.06.2007 20:55 -------------------- Dum spiro spero!
|
fox |
![]()
Сообщение
#3
|
Новичок ![]() Группа: Пользователи Сообщений: 18 Пол: Мужской Репутация: ![]() ![]() ![]() |
|
klem4 |
![]()
Сообщение
#4
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
Цитата мне её закрыли за неинформативность С неинформативностью с грехом пополам ты вроде разобрался, а вот с приказным тоном не особо. Здесь тебе никто ничего не должен, сам-то хоть пробовал сделать ? -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
fox |
![]()
Сообщение
#5
|
Гость ![]() |
С неинформативностью с грехом пополам ты вроде разобрался, а вот с приказным тоном не особо. Здесь тебе никто ничего не должен, сам-то хоть пробовал сделать ? пробевал но не получилось а чего незнаю а за приказной тон извените просто практика прикумарила задачи тяжёлые. ![]() |
Артемий |
![]()
Сообщение
#6
|
![]() Помощник капитана ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 601 Пол: Мужской Реальное имя: Артем Репутация: ![]() ![]() ![]() |
Вот и покажи что напробовал, а мы исправим..
-------------------- Dum spiro spero!
|
fox |
![]()
Сообщение
#7
|
Новичок ![]() Группа: Пользователи Сообщений: 18 Пол: Мужской Репутация: ![]() ![]() ![]() |
|
Артемий |
![]()
Сообщение
#8
|
![]() Помощник капитана ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 601 Пол: Мужской Реальное имя: Артем Репутация: ![]() ![]() ![]() |
Теги [code][code]
(перед вторым code слэш поставь) Прочти второй пункт правил раздела. Сообщение отредактировано: Артемий - 3.06.2007 10:06 -------------------- Dum spiro spero!
|
fox |
![]()
Сообщение
#9
|
Новичок ![]() Группа: Пользователи Сообщений: 18 Пол: Мужской Репутация: ![]() ![]() ![]() |
[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. |
Артемий |
![]()
Сообщение
#10
|
![]() Помощник капитана ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 601 Пол: Мужской Реальное имя: Артем Репутация: ![]() ![]() ![]() |
procedure nod(c,d,a:integer;var k:integer);
Ты ж сам говорил,что а и d должны быть real! Добавлено через 1 мин. k:=(2*c+lg(d)*51)/(d-a-1);
В pascal нужно ln(d) Сообщение отредактировано: Артемий - 3.06.2007 14:53 -------------------- Dum spiro spero!
|
fox |
![]()
Сообщение
#11
|
Новичок ![]() Группа: Пользователи Сообщений: 18 Пол: Мужской Репутация: ![]() ![]() ![]() |
а как из lg в ln перевести
![]() |
мисс_граффити |
![]()
Сообщение
#12
|
![]() просто человек ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 3 641 Пол: Женский Реальное имя: Юлия Репутация: ![]() ![]() ![]() |
fox, не надо по 10 одинаковых сообщений отправлять.
Думаешь, модераторы получат удовольствие от удаления их? чисто математически: lg(x)=ln(x)/ln(10) -------------------- Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения! |
Гость |
![]()
Сообщение
#13
|
Гость ![]() |
|
fox |
![]()
Сообщение
#14
|
Новичок ![]() Группа: Пользователи Сообщений: 18 Пол: Мужской Репутация: ![]() ![]() ![]() |
а задачку сможеш решить
|
![]() ![]() |
![]() |
Текстовая версия | 18.07.2025 0:16 |