Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
15.03.2010, 23:39
|
|
Участник форума
Регистрация: 25.11.2009
Сообщений: 201
Провел на форуме:
866555
Репутация:
226
|
|
Сообщение от [stranger]
что такое последняя "i"?
Как я понял он имел ввиду a[i]=4*sin(3*i)
|
|
|
15.03.2010, 23:52
|
|
Познающий
Регистрация: 17.02.2010
Сообщений: 45
Провел на форуме:
195184
Репутация:
47
|
|
по выше сказанному способу "a[i]=4*sin(3*i)" вот код
Код:
{$APPTYPE CONSOLE}
type
real = extended;
const
n = 12;
var
i, kol: integer;
b: array [1..n] of real;
rez: real;
begin
kol:=0;
for i:=1 to n do
begin
b[i]:=4*sin(3*i*pi/180);
if (b[i] > -1) and (b[i] < 1) then
begin
inc(kol);
rez:=rez + b[i];
end;
end;
for i:=1 to n do write(b[i]:0:3,' '); // элементы массива
writeln;
write (rez / kol:0:3);
readln;
end.
|
|
|
|
16.03.2010, 02:05
|
|
Новичок
Регистрация: 15.03.2010
Сообщений: 2
Провел на форуме:
10317
Репутация:
0
|
|
Прветствую.
у муня ткой вопрос. нужно на delphi написать прогу, могущую подрубиться к wi fi точке DWL-3200AP. проблема в незнании как это реализовать.
|
|
|
|
16.03.2010, 11:43
|
|
Познающий
Регистрация: 15.07.2009
Сообщений: 71
Провел на форуме:
520157
Репутация:
35
|
|
Сообщение от [stranger]
нужен код на winapi для архивации папок/файлов.. zlib не предлагать!
Вот юнит, в котором показан пример сжатия файла и памяти с помощью функций из ntdll.dll
|
|
|
|
16.03.2010, 11:58
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
Провел на форуме:
612028
Репутация:
28
|
|
спасибо! хорошая либа..
но мне архивация нужна не для уменьшения размера, а для того чтоб собрать множество мелких файлов в один..  |
|
|
|
16.03.2010, 14:53
|
|
Новичок
Регистрация: 07.01.2010
Сообщений: 11
Провел на форуме:
64528
Репутация:
0
|
|
Добрый день, мне очень срочно нужны ответы на пару вопросов...
1) Мне нужно чтобы при на жатии на кнопку на label выводился определенный текст (Это я сделал, не такой уж нуб), Но мне надо чтобы при втором нажатии на эту кнопку появлялся второй текст вместо прежнего, либо как сделать чтобы при нажатии на кнопку выводился текст а потом эта кнопочка удалялась и вместо нее появлялась другая кнопочка при нажатии на которую уже появлялся второй текст
2) Как сделать чтобы при нажатии на кнопку открывалось еще одна форма (окно)
и закрывалось старое.
|
|
|
|
16.03.2010, 15:42
|
|
Познающий
Регистрация: 15.07.2009
Сообщений: 71
Провел на форуме:
520157
Репутация:
35
|
|
Сообщение от [stranger]
спасибо! хорошая либа..
но мне архивация нужна не для уменьшения размера, а для того чтоб собрать множество мелких файлов в один.. А что тебе мешает записать все файлы в один?... ничего сложного в этом не вижу, сделай таблицу с указателями на файлы в едином 'архиве' или что нибудь подобное, вариации много)
|
|
|
|
16.03.2010, 16:25
|
|
Новичок
Регистрация: 04.02.2009
Сообщений: 14
Провел на форуме:
142880
Репутация:
0
|
|
Как осуществить загрузку файла на например на dump.ru?
Помогите плз
|
|
|
|
16.03.2010, 17:40
|
|
Познающий
Регистрация: 21.11.2009
Сообщений: 77
Провел на форуме:
2482290
Репутация:
29
|
|
Сообщение от Kassper
Добрый день, мне очень срочно нужны ответы на пару вопросов...
1) Мне нужно чтобы при на жатии на кнопку на label выводился определенный текст (Это я сделал, не такой уж нуб), Но мне надо чтобы при втором нажатии на эту кнопку появлялся второй текст вместо прежнего, либо как сделать чтобы при нажатии на кнопку выводился текст а потом эта кнопочка удалялась и вместо нее появлялась другая кнопочка при нажатии на которую уже появлялся второй текст
2) Как сделать чтобы при нажатии на кнопку открывалось еще одна форма (окно)
и закрывалось старое.
1)
Проверяй какой текст написан в label например так:
if label1.caption='текст 1' then
label1.caption:='текст 2'
2)
Создаёшь вторую форму file->new->form
Кидаешь кнопку и пишешь:
Form1.hide;
Form2.show;
|
|
|
|
16.03.2010, 18:24
|
|
Новичок
Регистрация: 07.01.2010
Сообщений: 11
Провел на форуме:
64528
Репутация:
0
|
|
Сообщение от TrueBit
1)
Проверяй какой текст написан в label например так:
if label1.caption='текст 1' then
label1.caption:='текст 2'
2)
Создаёшь вторую форму file->new->form
Кидаешь кнопку и пишешь:
Form1.hide;
Form2.show;
А я сделал по другому, я сделал примерно так:
Button1.Visible := False
Button2.Visible := True
Ну понятно изночально поставил у второй нивидимость=) И сделал чтобы когда на вторую жмякаешь уже второй текст выводился, Мне это первое в голову пришло так и сделал все получилось=) Вообще пытаюсь сделать чтото типо Книги мне возможно зачтут это за ЕГЭ а это ведь халявный экзамен из четырех я ваще буду очень рад если мне это зачтут, да и собираюсь на программиста думаю это тоже будет полезно в будущем...
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
![Аватар для [stranger]](/avatars/avatar113122.jpg?1986530){kind=avatar}
Похожие темы
Линейный вид
