Страница 2 из 2
Re: Помогите пожалуйста Решить 2 задачки на Pascal'е.
Добавлено: 25 июн 2008, 18:03
MYP3uk
Программа нужна, чем быстрее тем лучше. Желательно до конца месяца сдать.
Насчёт цен посмотрю (Кстати к слову - Это Лабораторная раБота).
Re: Помогите пожалуйста Решить 2 задачки на Pascal'е.
Добавлено: 25 июн 2008, 18:40
MYP3uk
Программа нужна, чем быстрее тем лучше. Желательно до конца месяца сдать.
Насчёт цен посмотрю (Кстати к слову - Это Лабораторная раБота).
Re: Помогите пожалуйста Решить 2 задачки на Pascal'е.
Добавлено: 25 июн 2008, 20:33
BHy4ok
Пиши в асю: 8721378
Или в личку.
Завтра гляну программу.
Re: Помогите пожалуйста Решить 2 задачки на Pascal'е.
Добавлено: 26 июн 2008, 11:16
Хыиуду
Я боюсь, за 100 +- 40 рублей ее сделает только очень хороший знакомый, либо абсолютный альтруист. Программа из разряда "Не сложно, но муторно"
Re: Помогите пожалуйста Решить 2 задачки на Pascal'е.
Добавлено: 28 июн 2008, 00:59
simbiont90
если еще надо - могу написать 2 прогу за 150р 458940943
Re: Помогите пожалуйста Решить 2 задачки на Pascal'е.
Добавлено: 29 июн 2008, 18:49
MYP3uk
СпасиБо всем Большое. Мне решили задачки.
Re: Помогите пожалуйста Решить 2 задачки на Pascal'е.
Добавлено: 30 мар 2010, 12:48
danil
Хыиуду писал(а):1. Примерно так
Код: Выделить всё
procedure smooth(x,y: integer);
var i,j: integer; count: integer; sum: real;
begin
count:=0;
sum:=0;
for i:=x-1 to x+1 do
for j:=y-1 to y+1 do
if (i>0) and (i<=10) and (j>0) and (j<=10) and (i or j<>0) then
begin
end;
for i:=x-1 to x+1 do
for j:=y-1 to y+1 do
if (i>0) and (i<=10) and (j>0) and (j<=10) and (i or j<>0) then
A[i,j]:=sum/count;
end;
Помогите пожалуйста Решить 2 задачки на Pascal'е или в Delphi.
Помогите пожалуйста Решить задачки на Pascal'е или в Delphi.
Добавлено: 30 мар 2010, 13:00
danil
(Тема - Динамические структуры данных)
Составить программу, моделирующую заполнение гибкого магнитного диска.
Общий объем памяти на диске 360 Кбайт. Файлы имеют произвольную длину от 18 байт до 32 Кбайт. В процессе работы файлы либо записываются на диск, либо удаляются с него.
В начале работы файлы записываются подряд друг за другом. После удаления файла на диске образуется свободный участок памяти, и вновь записываемый файл либо размещается на свободном участке, либо, если файл не вмещается в свободный участок, размещается после последнего записанного файла.
В случае, когда файл превосходит длину самого большого свободного участка, выдается аварийное сообщение. Требование на запись или удаление файла задается в командной строке, которая содержит имя файла, его длину в байтах, признак записи или удаления. Программа должна выдавать по запросу сведения о занятых и свободных участках памяти на диске.
СОВЕТ
Следует создать список занятых участков и список свободных участков памяти на диске.
Помогите пожалуйста Решить задачки на Pascal'е или в Delphi.