Помогите пожлуйста решить написать на паскале

[Suzukava]

Помогите плз решить задачку:
Составить программу, которая вводит три числовых значения (a,b,c) и, рассматривая их как длины сторон треугольника по формуле Герона
S= корень из p(p-a)(p-b)(p-c)
где p= 1/2(a+b+c)

хотябы алгоритм и как ее сделать,не пойму никак =(

---

[Drakosha]

Доброго вечера.
Возникла вот себя-развлекательного вида задача, но никак не могу найти с чего подступиться.
Хочется наваять себе существо настольное, то бишь нечто что бы существовало на рабочем столе и исполняло роль тамагочи что ли. Задача для меня новая... пока вот все не выходит найти материалы на тему чем и как начать.
Собственно, может кто-нибудь поделится материалами, источниками, которые можно поизучать?..

Делать хотела на С#. Язык выбирался из соображений больше обучения, чем целесообразности конкретной цели.

---

[Tale sorteggio]

Здравствуйте. Подскажите, пожалуйста, как в Visual Basic можно печатать текст на случайной метке?
Заранее спасибо.

---

c++

[*~.Samaya_Sladkaya.~*]

Здравствуйте!
подскажите как сделать сортировку по дате?

---

Сессионные задания студентов

[[revolver]]

Админ, удаляй к чёрту эти посты с просьбой выложить готовую программу. Надоело уже. Последний пост стал последней каплей, человеку ломы с паскаля на C# перевести. Что там делов то?! Я понимаю если бы был LISP, или HASKEL, а то с Паскаля на C#! БРРРР!

---

использование html-кода, echo и header в одном файле

[Просто ОНА]

Здравствуйте! Помогите пожалуйста решить проблему совмещения кода html, echo и header в одном файле.
Мне нужно сделать файл, оформление которого будет в отдельном css-файле, что бы в нём сначала шёл текст, а затем из базы данных MySQL к этому тексту прикреплялась картинка. Знаю, что намешивать это всё нельзя, но чем можно заменить header не знаю.
Вот так вот у меня выглядит нерабочий код:
< ? include "protect.inc";
include "dbSettings.inc"; ?>
< html >
< head >

< /head >
< body >
< ? $query="SELECT * FROM EXtours WHERE id='".$id."'";
$result=mysql_query($query)
or die ("Error:query");
while ($row=mysql_fetch_array($result))
{
echo ("Номер тура: ".$row["id"]."< br >");
echo ("Страна:".$row["EXtname"]."< br >");

header("Content-type: image/*");
echo ("Фотографии: ".$row["EXtimg"]);
}
?>
< /body >
< /html >

Заранее благодарю всех откликнувшихся!

---

[White Mike]

Скажите, позж, как написать прогу, которая выведет наименьшее число команд, которые нужны для получения из числа a число b. например из числа 3 число 57 причем команды только две: +3 и /4

@темы: Точка зрения, Программрование

---

В паскале

[Nuttka]

Ай нид нелп!
преобразовать одномерный массив таким образом,чтобы элементы, равные нулю, располагались после всех остальных.

---

[[revolver]]

Привет всем, уважаемые программисты! Хочется разрядить атмосферу зачётной недели и всех двоишников с вопросами. Нашёл у себя баянистый список с юморными характеристиками языков программирования:

If programming languages were cars...

If programming languages were cars...

• Ada is a tank. A butt-ugly tank that never breaks
  down. People laugh uncontrollably if you tell them you drive Ada, but really,
  do you want to be driving a sports car in a war zone?





• Assembly Language is a bare engine; you have to build
  the car yourself and manually supply it with gas while it's running, but if
  you're careful it can go like a bat out of hell.

  
  

  Assembly Language: you are the car.

  
  



• Basic is a simple car useful for short drives to the
  local shops. Once popular with learner drivers, it has recently been
  stripped down to a shell and rebuilt by a major manufacturer, The new version
  has been refurbished for longer journeys, leaving only cosmetic similarities
  to the original model.





• C is a racing car that goes incredibly fast but
  breaks down every 50 miles.





• Cobol is reputed to be a car, but no self-respecting
  driver will ever admit having driven one.





• C# is a competing model of family station wagons.
  Once you use this, you're never allowed to use the competitors' products
  again.





• C++ is a souped-up version of the C racing car with
  dozens of extra features that only breaks down every 250 miles, but when it
  does, nobody can figure out what went wrong.





• Eiffel is a car that includes a built-in driving
  instructor with a French accent. He will help you quickly identify and learn
  from your mistakes, but don't you dare argue with him or he'll insult you and
  throw you out of the car.





• Erlang is a fleet of cars that all cooperate to get
  you where you want to go. It takes practice to be able to drive with one
  foot in each of several cars, but once you learn how you can drive over
  terrain that would be very hard to navigate any other way. In addition,
  because you're using so many cars, it doesn't matter if a few of them break
  down.





• Forth is a car you build yourself from a kit. Your
  car doesn't have to look or behave like anyone else's car. However, a Forth
  car will only go backwards.





• Fortran is a pretty primitive car; it'll go very
  quickly as long as you are only going along roads that are perfectly
  straight. It is believed that learning to drive a Fortran car makes it
  impossible to learn to drive any other model.





• Java is a family station wagon. It's easy to drive,
  it's not too fast, and you can't hurt yourself.





• Haskell is an incredibly elegantly-designed and
  beautiful car, which is rumored to be able to drive over extremely strange
  terrain. The one time you tried to drive it, it didn't actually drive along
  the road; instead, it made copies of itself and the road, with each
  successive copy of the road having the car a little further along. It's
  supposed to be possible to drive it in a more conventional way, but you don't
  know enough math to figure out how.

  
  
  

  Haskell is not really a car; it's an
  abstract machine in which you give a detailed description of what the process
  of driving would be like if you were to do it. You have to put the abstract
  machine inside another (concrete) machine in order to actually do any
  driving. You're not supposed to ask how the concrete machine works. There
  is also a way to take multiple abstract machines and make a single abstract
  machine, which you can then give to the concrete machine to make multiple
  trips one after another.





• Lisp looks like a car, but with enough
  tweaking you can turn it into a pretty effective airplane or
  submarine.

  
  

  Lisp: At first it doesn't seem to be a car at all, but
  now and then you spot a few people driving it around. After a point you
  decide to learn more about it and you realize it's actually a car that can
  make more cars. You tell your friends, but they all laugh and say these cars
  look way too weird. You still keep one in your garage, hoping one day they
  will take over the streets.

  
  



• Mathematica is a well-designed car that borrowed a
  lot from the Lisp car without giving it nearly the credit it deserved. It
  can solve equations to determine the most efficient way to get to the
  destination, but it costs a fortune





• Matlab is a car designed for novice drivers going on
  short trips over terrain similar to the terrain the Mathematica car is
  usually driven over. It is very comfortable when driving over this terrain,
  but if you go off the trail even a little the car becomes so hard to drive
  that more snobby drivers refuse to even acknowledge that it's a car.





• Ocaml is a very sexy European car. It's not quite as
  fast as C, but it never breaks down, so you end up going further in
  less time. However, because it's French, none of the controls are in the
  usual places.





• Perl is supposed to be a pretty cool car, but the
  driver's manual is incomprehensible. Also, even if you can figure out how to
  drive a Perl car, you won't be able to drive anyone else's.





• PHP is the Oscar Mayer Wienermobile, it's bizarre and
  hard to handle but everybody still wants to drive it.





• Prolog is fully automatic: you tell it what your
  destination looks like, and it does all the driving for you.
  However, the effort required to specify most destinations is
  equivalent to the effort of driving there.

  
  

  Prolog is a car with a unique trial-and-error GPS
  system. It will go down the road looking for your destination, and if it
  gets to the end of the street without finding it, it will back up and try the
  next street over and continue until you get where you need to go.

  
  



• Python is a great beginner's car; you can drive it
  without a license. Unless you want to drive really fast or on really
  treacherous terrain, you may never need another car.





• Ruby is a car that was formed when the Perl, Python
  and Smalltalk cars were involved in a three-way collision. A Japanese
  mechanic found the pieces and put together a car which many drivers think is
  better than the sum of the parts. Other drivers, however, grumble that a lot
  of the controls of the Ruby car have been duplicated or triplicated, with
  some of the duplicate controls doing slightly different things in odd
  circumstances, making the car harder to drive than it ought to be. A
  redesign is rumored to be in the works.





• Smalltalk is a small car originally designed for
  people who were just learning to drive, but it was designed so well that even
  experienced drivers enjoy riding in it. It doesn't drive very fast, but you
  can take apart any part of it and change it to make it more like what you
  wanted it to be. One oddity is that you don't actually drive it; you send it
  a message asking it to go somewhere and it either does or tells you that it
  didn't understand what you were asking.





• Visual Basic is a car that drives you.

  
  

---

[Spiky]

доброго времени суток.

у кого-нибудь есть исходник "пирамидальной сортировки" на паскле?
а именно - удаление элемента из дерева

---

прграммирование C

[Lucii]

Помогите, пожалуйста с задачей.. Можно не полностью, а хотя бы алгоритм...

спасибо заранее

Элементы массива вещественных чисел не убывают. Двоичным поиском найти позицию(индекс), где в этот массив можно вставить заданное число x с сохранением упорядоченности массива. Дан файл, в котором первое число-это х, второе-количество элементов, остальные-элементы.

---

С++

[Люцианна]

Метод Ньютона для нелинейных систем, работает некорректно, выдает дурацкие значения: paste.org.ru/?2bz0bk
Помогите, пожалуйста, найти ошибку.

запись создана: 09.12.2008 в 15:39

---

и снова с учебным.

[Arkeliil Iltelero]

Прошу простить уважаемых членов сообщества,что,как и многие лезу с учебным,но просто не могу выловить баг...а хорошо бы это сделать к завтрашнему утру...
итак:

Есть задача:

Скопировать содержимое текстового файла, ограничив длину строки N символами. Слова, не помещающиеся в заданную строку не копировать.

Есть решение,написанное мной:


paste.org.ru/?arsgx0






и при всех MAXLEN меньших 25 она работает чудесно. Но если MAXLEN превышает 24, программа не копирует вторую строку.

содержание тестового файла:

AAABBBCCCDDDdzvzdv zvzv
EEEEFFFFGGGGHHHHcszdcdzvdzvdz
IIIIIJJJJJKKKKKLLLLLzdvdzvdzdvzd


Помогите поправить баг...ибо препод любит их находить и отправлять на перездачу...Можно написать словами в чем он,но лучше поправьте код...

Про то,что calloc никто не юзает,а юзает malloc -знаю. Но здесь юзать надо calloc,ибо нам атк сказали.

@темы: учебное, helpdesk

---

Кто смыслит в микропрограммировании?

[winterwolf]

Кто-нибудь смыслить в микропрограммировании?

Необходимо расписать микрокоманды и потом их оптимизировать.
1. CPI d8 (сравнение - двух байтовая команда) (S3S2S1S0M : Q:=A − B
2. CALL Adr (вызов подпрограммы - 3 байтная команда)


Способ микропрограммирования – горизонтальный
_____________________

С выборкой команд проблем не возникло, а вот с выполнением самой команды есть.

@темы: Микропрограммирование

---

Помогите пожалуйста

[iGuess]

НЕобходимо написать программу на языке QBasic и блок-схему к этой таблице!

Помогите пожалуйста, т.к. я понятия не имею, как это можно сделать!

Заранее огромное спасибо за помощь и отзывчивость!

 

@темы: Работа

---

[Татик.]

здравствуйте!
пожалуйста, если не сложно, ответьте на вопрос -
Каким вы видите будущее ИТ технологий?
очень надо - хочется мнения в проектную работу поместить)

@темы: Точка зрения

---

[hoterwer]

Помогите с Borland C++
1) Даны натуральные числа Ки N. Составить программу формирования массива А, элементами которого являются числа, сумма цифр которых равна К и которые не больше N

Вот я попробывал ее решить, но что-то не получилось.
#include
#include
#include
#include
void main()
{int S,l1,q,n,j,i,k;
int A[10];
clrscr();
cout<< "k="; cin>>k;
cout<< "n="; cin>>n;
for (i=1; i0)
{l1=q%10;
S=S+l1;
q=q/10;
if (S=k); printf("A=",A[]=i);}
getch();
}

2)Описать рекурсивную функцию Root (a, b, E), которая методом деления отрезка пополам находит с точностью E корень уравнения f(x) = 0 на отрезке [а, Ь] (считать, что E>0, а<Ь,
f(a)*f(b) < 0 и f(х) — непрерывная и монотонная на отрезке [а, Ь] функция).

---

пильщиков 8 24 а

[ducktales/]

проверьте, пожалуйста.

программа считает по схеме горнера
должна быть легко перенастраема на любую степень многочлена.
заодно проверяет правильные ли данные введены (параменты и точка)
и предлагает повторить

код

program p824a(input,output);
{$I-}

const raz=4;

var i,j,n:integer;
mas:array[0..raz]of real;
sum,t,k: real;
c:char;
rep:boolean;

begin
rep:=true;
while rep do begin
writeln('enter parametri and tochky t');
rep:=true;
n:=0;
while n<=raz+1 do begin
read(k);
if IOResult<>0 then begin
writeln('wrong enter');
n:=raz+3;
end
else begin
if n=raz+1 then t:=k
else mas[n]:=k;
n:=n+1;
end;
end;
if n<>raz+3 then begin
sum:=mas[raz];
for i:=raz downto 1 do
begin
sum:=(sum*t)+mas[i-1];
end;
writeln('znachenie mnogochlena: ',sum:0:4);
end;
readln;
writeln('repeat? "n" if you dont want, over letter, if you want');
readln(c);
if c='n' then rep:=false;
end;
end.

@темы: мгу, вмк, учеба

---

паскаль

[ducktales/]

ищу человека, кто хорошо знает паскаль,
кто сделет мне в течение 2-(максимум) 3 недель 4 задачки для института.
заплачу. сколько - обсудим, но задачи вроде бы не очень сложные.

очень надеюсь на помощь.

задачи

1.
"программа. во входном файле задана непустая последовательность положительных целых чисел, за которой следует ноль. описав подходящую рекурсивную функцию или процедуру, найти наибольшее из этих чисел"

2.
"кольцевым (циклическим) списком называется однонаправленный список, в последнем звене которого вместо nil указывается ссылка на первое звено.
(тут есть рисунок, ну просто это определение поясняющий, если очень надо, могу попытаться нарисовать..)
пусть L обозначает кольцевой список из элементов типа ТЭ, а Е - величину типа ТЭ. описать функцию или процедуру, которая:
удаляет из непустого списка L первый элемент (учесть, что должна быть изменена ссылка в последнем звене)"

3.
"формулу вида

формула> ::= | ()
::= + | - | *

где терм - цифра или малая латинская буква, можно представить в виде двоичного дерева ("дерево-формулы") с ТЭД=char согласно следующим правилам: формула из одного терма представляется деревом из одной вершины с этим термом, а формула вида (фи1 ТРЕУГОЛЬНИЧЕК (видимо дельта, но хер знает) фи2) - деревом, в корне которого записан знак ТРЕУГОЛЬНИЧКА (дельты?), а левое и правое поддеревья - это соответствующие представления фи1 и фи2
описать рекурсивную функцию или процедуру, которая:

выводит дерево-формулу Т в постфиксной записи, в которой знаки операций становятся после их операторов и скобки не указываются
(например: (x*(y-1)) -xy1)"

@темы: Работа

---

Ищу программку

[Люцианна]

Народ, не подскажите где можно скачать бесплатную рабочую версию Dev C++ на русском? А то я сколько не искала - либо английские версии, либо битые ссылки, либо поврежденные файлы попадаются...
ЗЫ: может кто-нибудь еще знает, почему Google Chrome при наборе сообщений мне подчеркивает красным вообще все слова кроме пары местоимений и служебных частей речи? Моя не понимать...