| Статистика |
Онлайн всего: 1 Гостей: 1 Пользователей: 0 |
|
Страницы: « 1 2 ... 22 23 24 25 26 ... 32 33 »
Показано 346-360 из 487 сообщений
142.
ice
(02.04.2005 21:46)
0  
здорово, что есть люди готовые помочь!!!!!! Молодцы!!!
Ответ: Спасибо за такие слова:)
Однако над сайтом работает только один чел.
Как трудно делать всё одному...
|
141.
Женя
(02.04.2005 15:37)
0
Не хвотает заархивированных учечников
Ответ: Если у тебя есть учебники и тебе не жалко, что ими будут пользоваться другие - присылай их!
Все будут только ЗА.
|
140.
Маша
(30.03.2005 16:37)
0
Все-равно спасибо за решенные задачи.
P.S. А можно вместо "Заранее спасибо" писать " Неспасибо заранее".
Ответ: :)
Заранее не благодарят!
|
139.
Асинька
(29.03.2005 22:04)
0
ПОМОГИТЕ!!!!Составить программу вычесления суммы кубов от 25-23!!!!
Ответ: Самое главное, чтобы решить любую задачу, нужно понять её условие.
Условие данной задачи не понятно...
|
138.
Дима
(29.03.2005 13:01)
0
"В заданном тексте найти слова палиндромы."
Уже себе мозги сломал !!!
Помоги пожалуйста, чем сможешь.
|
137.
Вика
(23.03.2005 22:27)
0
Здравствуйте! Помогите решить задачку: Дана последовательность, содержащая от 2 до 50 слов, в каждом из которых от 1 до 8 строчных латинских букв; между соседними словами - не менее одного пробела, за последним словом - точка. Напечатать те слова последовательности, которые отмечены от последнего слова и удовлетворяют следующему свойству: первая буква слова входит в него еще раз. Спасибо!
|
136.
Маша
(21.03.2005 13:09)
0
Учусь я в школе. С твое
Ответ: Сложная, однако, в школе учебная программа...
У меня такого в школе не было.
|
135.
Юля
(16.03.2005 21:34)
0
помогите пожалуйста составить программу очень нужно.
1. Дано целое число. Определить все его целочисленные делители.
2. Дан одномерный массив чисел. Определить в нем два элемента, среднее арифметическое которых ближе всего к заданному числу N. Число N вводится с клавиатуры.
Ответ: = 1 =
http://www.pascalstudy.narod.ru/exemple/11.html
Смотри функцию summ_del. Замени s:=s+i на writeln(i), ну и почти готово.
= 2 =
http://www.pascalstudy.narod.ru/exemple/24.html
|
134.
Маша
(15.03.2005 20:47)
0
Вот не могу решить задачку:имеется квадратный лист бумаги со стороной а. Из листа делается коробка. Какова должна быть сторона вырезаемого квадрата, чтобы коробка имела наибольшую вместимость? Даны конкретные значения( а=6 см;а=18 см).Решение квадратного уравнения оформить как подпрограмму.
Заранее спасибо.
Ответ: Маша, а где же ты так учишься, что тебя задачами на Паскале мучуют:)
P.S. Ненавижу фразы типа этой: "Заранее спасибо" !
|
133.
Диана
(14.03.2005 12:44)
0
Привет..Слушай, помоги, тут надо такую задачу решить - вводится слово с клавиатуры, а надо, чтобы оно получилось наоборот...
Например, воодишь слово CAT, нажимаешь Enter, и оно отображается как TAC
Ответ: http://www.pascalstudy.narod.ru/exemple/23.html
|
132.
Я
(13.03.2005 18:31)
0
хэлп!!!!!!!!!!!!!!!!!!!!!
скажите пожалуйста, откуда можно скачать модуль system.tpu для bp?
Ответ: Тут должно быть всё необходимое:
http://www.pascalstudy.narod.ru/bin.html
|
131.
Лукерья
(13.03.2005 14:55)
0
Здравствуйте!
Чмоки-чмоки-чмоки! Выручили! Огроменное спасибо!!!
Ответ: :)
|
130.
Лукерья
(12.03.2005 13:22)
0
Здравствуйте, я опять с благодарностью - это вы здорово придумали, молодечки!
А теперь помогите поправить - есть программа на расширяющийся квадрат, а мне нужно - несколько расширяющихся прямоугольников Что сделать?
BEGIN
grafika_on; x:=300;
y:=200;
for i:=1 to 100 do
begin
setcolor(9);
rectangle(x-i,y-i,x+i,y+i);
delay(100);
setcolor(0);
rectangle(x-i,y-i,x+i,y+i);
end;
readkey; closegraph;
END.
Ответ: Ну, если по простому, то просто добавить "рисование" новых квадратов, а координаты центра изменить:
BEGIN
grafika_on;
x:=300; x2:=350;
y:=200; y2:=350;
for i:=1 to 100 do
begin
setcolor(9);
rectangle(x-i,y-i,x+i,y+i);
rectangle(x2-i,y2-i,x2+i,y2+i); {новый квадрат на новом месте}
delay(100);
setcolor(0);
rectangle(x-i,y-i,x+i,y+i); {стираем оба}
rectangle(x2-i,y2-i,x2+i,y2+i)
end;
readkey; closegraph;
END.
|
129.
Маша
(12.03.2005 12:29)
0
Ой, спасибо большое пребольшое. Так приятно, что вопросы не остаются без ответов. Спасибо!
|
128.
Маша
(11.03.2005 15:41)
0
И продолжение 2 задача о футболисте.
Program K1;
Function Vas(var v,t,h:real):real;
begin
Vas:={тут какая-то формула для вычисления высоты}
end;
begin
writeln(«через 1 сек на высоте: »Vas ({не знаю});
writeln(«через 3 сек на высоте:»Vas( );
writeln(«через 4 сек на высоте:»Vas( );
end.
Очень срочно надо, пожалуйста помогите.
Ответ: Ну вот, почти правильно! Физику только нужно знать:)
========================
const
v=20; {скорость }
h=1; {начальная высота}
Function Vas(const t:real):real;
begin
Vas:=h+v*t;
end;
begin
writeln(''через 1 сек на высоте: '', Vas(1):3:1);
writeln(''через 3 сек на высоте: '', Vas(3):3:1);
writeln(''через 4 сек на высоте: '', Vas(4):3:1);
end.
|
|
|
|
