|
0 / 0 / 0
Регистрация: 08.03.2010
Сообщений: 57
|
||||||
Одномернный массив problems с программой.18.01.2011, 20:14. Показов 982. Ответов 15
Метки нет (Все метки)
Вот само задание!В последовательности действительных чисел есть только положительные и отрицательные элементы. Вычислить произведение отрицательных элементов P, затем произведение положительных элементов D.
Сравнить модули P и D, указать, какое из произведений по модулю больше. вот код программы
Выдаёт ошибки не как понять не могу! Добавлено через 6 минут Ответьте не поймуу Добавлено через 4 минуты Функции какие добавить???
0
|
||||||
| 18.01.2011, 20:14 | |
|
Ответы с готовыми решениями:
15
Problems with Code Block 12.11 Problems reading data Pow and ABS problems |
|
131 / 108 / 12
Регистрация: 04.12.2010
Сообщений: 313
|
||||||
| 18.01.2011, 20:22 | ||||||
0
|
||||||
|
0 / 0 / 0
Регистрация: 08.03.2010
Сообщений: 57
|
|
| 18.01.2011, 20:25 [ТС] | |
|
0
|
|
|
131 / 108 / 12
Регистрация: 04.12.2010
Сообщений: 313
|
|
| 18.01.2011, 20:27 | |
|
у меня - меньше !
0
|
|
|
0 / 0 / 0
Регистрация: 08.03.2010
Сообщений: 57
|
|
| 18.01.2011, 20:30 [ТС] | |
|
0
|
|
|
131 / 108 / 12
Регистрация: 04.12.2010
Сообщений: 313
|
|
| 18.01.2011, 20:41 | |
|
тю ты... если не веришь - скрин могу выслать...
0
|
|
|
0 / 0 / 0
Регистрация: 08.03.2010
Сообщений: 57
|
|
| 18.01.2011, 20:43 [ТС] | |
|
0
|
|
|
131 / 108 / 12
Регистрация: 04.12.2010
Сообщений: 313
|
|
| 18.01.2011, 20:56 | |
|
Да пожалуйста )
0
|
|
|
899 / 793 / 186
Регистрация: 21.02.2009
Сообщений: 1,722
|
||||||
| 18.01.2011, 21:11 | ||||||
0
|
||||||
|
|
||||||
| 18.01.2011, 21:16 | ||||||
|
hakerok115, твой код, немного переделанный
0
|
||||||
|
131 / 108 / 12
Регистрация: 04.12.2010
Сообщений: 313
|
|
| 18.01.2011, 21:30 | |
|
romedal, на результат всё-равно никак не повлияло... про100 для удобств выводишь массив и всё ))))
0
|
|
|
131 / 108 / 12
Регистрация: 04.12.2010
Сообщений: 313
|
||||||
| 18.01.2011, 22:00 | ||||||
|
ой, блин... обломали )))
0
|
||||||
|
0 / 0 / 0
Регистрация: 28.01.2011
Сообщений: 18
|
|
| 28.01.2011, 17:28 | |
|
Помогите пожалуйста с программкой очень срочно надо! дело состоит в том чтобы нарисовать велосипед и привести его в движение с помощью модуля graph-все это я сделал проблема: не могу привести в движение педали ((((
Вот программа: Program velobike; Uses crt,graph; Var gr:integer; gm:integer; x,y:integer; begin gr:=detect; initgraph(gr,gm,'..\bgi'); x:=600; y:=250; repeat for x:=0 to 600 do begin cleardevice; setbkcolor(8); setcolor(2); setlinestyle(1,0,1); rectangle(1,3,639,475); setfillstyle(1,6); bar(2,280,638,475); setcolor(6); setfillstyle(1,2); circle(x-150,y,27); floodfill(x-140,y-10,6); setcolor(yellow); circle(x-150,y,3); setcolor(6); setfillstyle(1,2); circle(x-0,y,27); floodfill(x-0,y-10,6); setcolor(yellow); circle(x-0,y,3); setcolor(yellow); circle(x-70,y,10); circle(x-70,y,2); setcolor(yellow); arc(x-150,y,355,190,30); arc(x-0,y,445,200,30); setcolor(2); setlinestyle(0,0,2); line(0,280,639,280); setcolor(white); setlinestyle(0,2,3); moveto(x-110,y-50); lineto(x-15,y-50); moveto(x-150,y); lineto(x-70,y); lineto(x-10,y-35); moveto(x-70,y); lineto(x-110,y-50); moveto(x-150,y); lineto(x-110,y-50); moveto(x-150,y); lineto(x-170,y-35); lineto(x-123,y-35); moveto(x-0,y); lineto(x-20,y-73); lineto(x-40,y-60); moveto(x-20,y-73); lineto(x-12,y-90); moveto(x-150,y); lineto(x-180,y-10); moveto(x-0,y); lineto(x-30,y); setcolor(6); setlinestyle(0,0,1); moveto(x-70,y); lineto(x-55,y-20); setcolor(red); lineto(x-45,y-20); setcolor(8); moveto(x-70,y); lineto(x-75,y+20); setcolor(6); lineto(x-85,y+20); setcolor(6); moveto(x-110,y-50); lineto(x-115,y-63); setcolor(red); moveto(x-40,y-60); lineto(x-50,y-60); moveto(x-12,y-90); lineto(x-22,y-90); setcolor(red); setlinestyle(0,0,3); moveto(x-123,y-63); lineto(x-103,y-63); delay(10000); end; settextstyle(0,0,3); cleardevice; setcolor(red); outtextxy(30,240,'XoTuTe IIocMoTpeTb eLLLe?'); outtextxy(100,280,' Ha}|{MuTe Enter '); readln; until keypressed; readln; closegraph; end.
0
|
|
|
216 / 216 / 33
Регистрация: 26.12.2010
Сообщений: 691
|
|
| 28.01.2011, 17:34 | |
|
balu тебе в другой раздел, тут c/c++ а не паскаль))
Не по теме: p.s. и пользуйтесь тегами форматирования текста
0
|
|
|
0 / 0 / 0
Регистрация: 28.01.2011
Сообщений: 18
|
|
| 28.01.2011, 17:34 | |
|
ой )) сорри
0
|
|
| 28.01.2011, 17:34 | |
|
Помогаю со студенческими работами здесь
16
Помочь разобраться с программой. Написать функцию вставки элемента в массив
Ошибка: Problems Physical memory ... problems BIOS problems Problems with zapros Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
Новые блоги и статьи
|
|||
|
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
|
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
|
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2.
Данный документ берёт данные из другого нетипового документа. . .
|
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
|
|
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2.
Задача: реализовать программный контроль на предмет проведения документа. . .
|
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2.
Задача:
1. Реализовать контроль заполнения реквизита. . .
|
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение:
DISM / Online / Add-Capability / CapabilityName:WMIC~~~~
Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
|
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2.
Задача: при создании документов установить период списания автоматически. . .
|