Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 938 • Страница 16 из 47<  1 ... 13  14  15  16  17  18  19 ... 47  >
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
 

Member
Статус: Не в сети
Регистрация: 28.03.2006
Zoom Evstrahiev писал(а):
С++ не пошёл...

false

_________________
Первый огонь был получен людьми из-за перегрева.
Пессимист отличается от оптимиста датой наступления конца света.



Партнер
 

Member
Статус: Не в сети
Регистрация: 14.01.2004
Откуда: Киев, Украина
eisernWolf
Цитата:
Для этого можно использовать примерно такой метод:
Бага, strlen возвращает длину строки без нуль терминала, нужно:
char* buffer = new char[strlen(s) + 1];

_________________
Ку ку


 

Member
Статус: Не в сети
Регистрация: 17.10.2003
Откуда: Киев
на курсовую нужен простейший текстовый редактор на ассемблере под дос. Написать естественно не прошу:D, может у кого завалялся исходник? заранее спасибо :beer:


 

Member
Статус: Не в сети
Регистрация: 23.04.2006
Откуда: Москва
Задали нам сделать в qbasic две задачи:
1)Ввести одномерный массив I={13,4,-2,6,7,-1,-5,2,-3,4}. Вычислить и вывести m[0]n[0]+m[1]n[1]+...+m[k]n[k], где m[0],m[1],...m[p]-отрицательные элементы массива I, взытые в порядке их следования; n[0],n[1],...n[q]-положительные элементы массива I взятые в обратном порядке их следования; k=min{p,}.
2)Строка содержит дату в формате "mm-dd-yyyy", где mm-месяц, dd-день, yyyy-год. Проверить корректность задания даты и получить строку с датой в формате "dd.mm.yy", где yy-две последние цифры года.

Первую задачу я вроде сделал:
CLS
INPUT "Введите N";N
DIM A(1 to N)
DIM B(1 to N)
DIM C(1 to N)

FOR I=1 to N
Print "A(";I;")=";
Input A(I)
NEXT I
FOR I=1 to N
PRINT "A(";I;")="; A(I); SPC(2)
Next I
Print
For I=1 to N
If A(I)<0 THEN
k=k+1
B(k)=A(I)
END IF
NEXT I
For I=N to 1 STEP -1
IF A(I)>0 THEN
L=L+1
C(L)=A(I)
END IF
Next I
For I=1 to N
S=S+B(I)*C(I)
Next I
Print "Сумма";S
END
Но она почему то не работает:( А вот со второй задачей еще хуже:вообще не знаю как делать. Помогите сделать эти две задачи кто знает!:oops:


 

Roix - я бы помог тебе сделать - да у меня нет qbasic!!! ктонить помоги товарищу!!!! ведь вот так и вылетают из инстов хорошие люди!!!


 

Member
Статус: Не в сети
Регистрация: 19.08.2005
Откуда: СПб
Deleted

_________________
=nVidia OverGuru= || -=AMD OverClub=- || HardwareTech_TSC!_Team || ПС - People.overclockers.ru/Nicl || www.hwtech.ru


Последний раз редактировалось Nicl 02.05.2006 17:54, всего редактировалось 1 раз.

 

просмотрщик изображений на Delphi наподобии ACDSee

Уважаемые читатели подкиньте если есть сие чудо или сделайте это вроди не сложная вешь, просто друг просил найти ...
требования к проге чтобы открывала кучу маленьких эскизов в одном окне из дериктории а при нажатии на искиз открывалось полное изображение ну и так по мелочи можите присоединить слайд шоу их .
очень прошу помогите, зарание СПАСИБО !
вот мыло куда скинуть makgaiver@gmail.com


 

Member
Статус: Не в сети
Регистрация: 28.01.2005
Откуда: UKRAINE KIEV
Люди помогите пожайлуста с программкой, мне надо написать програму: Кодирование (прямой код, дополнительный код, модифициронный код) , сложения. На Delphi


 

Member
Статус: Не в сети
Регистрация: 16.08.2004
Откуда: Москва
Помогите написать прогу на Turbo Pascale, надо чтобы в массиве из 10 цифр выбиралось наибольшее и наименьшие значение по модулю, я сделал чтоб выбиралось просто макс и мин значениа а как сделать по модулю, помогите плз
Вот что получилось
Цитата:
program minmax;
uses crt;
const
n=10;
var
A:array[1..n] of integer;
max,min,i,v,k: integer;
begin
clrscr;
for i:=1 to n do
begin write('A[',i,']');
readln(A[i]);
end;
min:=A[1];
max:=min;
i:=2;
while i<n do
begin
k:=A[i];
v:=A[i+1];
if k>v then
begin if k>max then
max:=k;
if k<min then
min:=v;
end
else
begin if v>max then
max:=v;
if k<min then
min:=k;
end;
i:=i+2;
end;
if A[n]>max then max:=A[n];
if A[n]<min then min:=A[n];
writeln('max=',max,' ','min=',min);
readkey;
end.


 

Member
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
DEMON23 используй при сравнении функцию abs() - она возвращает абсолютную величину числа.

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)


 

Member
Статус: Не в сети
Регистрация: 16.08.2004
Откуда: Москва
Lord_of_Darkness
я использовал, все равно не работает


 

Member
Статус: Не в сети
Регистрация: 03.01.2004
Откуда: Питер
DEMON23
Цитата:
я использовал
как использовал? выложи исходник. Просто подправь предыдущий пост с программой, и используй тег code вместо quote.

_________________
Здесь так мало тех, с кем легко говорить,
Еще меньше тех, с кем не страшно молчать (c)


 

Junior
Статус: Не в сети
Регистрация: 09.05.2005
Откуда: Moscow City
Тут возникли проблемы с программами по ассемблеру

Собственно вот 2 штуки

1. Определить, содержит ли байт данных в кодовом сегменте в разрядах 6-2 двоичную комбинацию 11010. Если да, то сформировать код в регистре ВН следующим образом : сумма тетрад исходного байта, если значение старшейй тетрады больше младшей, разность тетрад в противном случае.
Если полученный в ВН код меньше 40, инвертировать его.

2. В области кодового сегмента размещен массив двухбайтных данных. Данные, значения которых находятся в интервале от -20 до 20 заменить на противоположные по знаку и в однобайтном формате записать в другую область.

Все проги односегментные, т.к. потом надо делать .сом

Вот мои соображения:

Код:
.386
preved segment use32
   assume cs:preved
               org 100h
M1: mov ax,preved
    mov cs,ax
       mov al,ds:[a]
       and al,01111100b
       cmp al,01101000b
       jne M2
       mov al,ds:[a]
       mov ah,al
       ror ah,4
       and ax, 0000111100001111b
       cmp ah,al
       jl M3
       add ah,al
       mov bh,ah
M3:  sub ah,al
        mov bh,ah
M2:  cmp bh,40
        jge M4
        not bh
M4:  int 20h
        a db (?)
preved ends
        end M1


и вторая

Код:
.386
preved segment use32
assume cs:preved
Org 100h
M1: mov ax,preved
    mov cs,ax
      mov cs,ax
      mov CX,10
      mov SI,0
      mov DI,0
M2: cmp cs:[mass+SI],-20
      jg M3
      inc SI
      inc SI
      jmp M5
M3: cmp cs:[mass+SI],20
      jl M4
      inc SI
      inc SI
      jmp M5
M4: neg cs:[mass+SI]
      mov al,cs:[mass+SI]
      mov cs:[mass2+DI]
      inc DI
M5: loop M2
     int 20h
mass dw 10 dup (?)
mass2 db 10 dup (?)
preved ends
      end M1


:(


 

Member
Статус: Не в сети
Регистрация: 28.01.2005
Откуда: UKRAINE KIEV
(рус)
Для периодической функции f(x) с периодом T=2L
1)Записать ряд Фурье S(X) построить график частичной суммы S40(x).Найти f(M2) S(M1) S(M2)

2) разложить функцию f(х) на промежутке (0,L) в ряде Фурье S(x) по косинусам, построить график частичной суммы S(40)

3)Разложить функцию f(х) на промежутке (0,L) в ряд Фуре S(X) по синусам, построить график частичной суммы S40(x)

(укр)

Для заданої періодичної з періодом T=2L функції f(x) :
1)Записать ряд фурє S(x), побудувати графік часткової суми S40(x). Знайти f(M1) f(M2) S(M1) S(M2)

2)розкласти функцію f(х) на проміжку (0,L) в ряд Фурє S(x) по косинусах, побудувати графік часткової суми
S(40)

3)Розкласти функцію f(х) на проміжку (0,L) в ряд Фурє
S(X) по синусах, побудувати графік часткової суми S40(x)

#77

Люди вот это задание помогите зделать. ПЛЗ
Можно зделать в мат каде http://twt.mpei.ac.ru/MAS/Worksheets/Fourier.mcd Но я не знаю как эту функцию записать в МАт каде. Если не трудно можете помочь.


 

Кто-нибудь знает, как сделать программу выводящие время, в которой 1 минута равна 1 настоящей секунде.
Если да то выложите код либо на ТурбоПаскале, либо на Делфи.

Примерно так
2006.05.11 15:21 через секуду
2006.05.11 15:22


 

Member
Статус: Не в сети
Регистрация: 28.03.2004
Откуда: Surgut
Товарищи, помогите пжалст. Вот дали К.р. сделать еще давно , а сдавать сейчас - типа мы все якобы прошли и умеем все это делать но почемуто из моих знакомых никто не в курсе как это делать...
Вобщем вот, выполнить в Excel-е , хотябы натолкните на мысль...:
Код:
 
Для уравнения x^(1\3) + lgx = 1,56 получена итерационная формула
x<i>=10^(1,56-(x<i-1>))^(1\3)
Определить корень уравнения с точностью E=10^-3 если x<0>=2

Там где написано <...> имеется ввиду нижний индекс, там где ^ - степень.
Я пока сосканю и позже выкину сюда скан ато трудно наврено понять задание...

_________________
:: Overclock your mind !!! ::


 

Member
Статус: Не в сети
Регистрация: 28.03.2004
Откуда: Surgut
Вс, не нужно мне помощи, оказывается перпод гад ошибся, естессно это все делается за пару минут в маткаде.

_________________
:: Overclock your mind !!! ::


 

Member
Статус: Не в сети
Регистрация: 18.07.2005
Откуда: Из Москвы
вот такую задачку помогите решить,а то я сижу вот..голову ломаю :(

Дана квадратная матрица целых чисел.Поменять местами элементы главной и побочной диагоналей.

Если можно,еще поясните что и как там.. :roll:

_________________
Let's have no sadness — furrowed brow.
There's nothing new in dying now


 

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

-------------------------------------------------
Дано:
придумать как работать с постоянными деревьями
persistent

что то типа примера:
1 шаг - дерево пустое
2 шаг - 1 элемент
3 шаг - еще 1 элемент добавили
--------------------------------------------------

Для начала ничего не нашел про постоянные деревья. Что это за звери такие? И что они едят? Вот.

Или же как альтернативный вариант:
-------------------------------------------------
Дано:
имеется множество элементов
1 4 3 2 5
модифицировать поля в элементах так, чтобы элементы могли входить в разные деревья
-------------------------------------------------

Буду признателен за помощь по любому из этих заданий.
Заранее спасибо!


 

Member
Статус: Не в сети
Регистрация: 14.03.2004
Откуда: Москва
EnemyT2 Я о таких тоже не слышал

_________________
ФИЗТЕХ- рулез, ФАКИ - сила, Кванты тоже хорошо


Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 938 • Страница 16 из 47<  1 ... 13  14  15  16  17  18  19 ... 47  >
-

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan