Member
Статус: Не в сети Регистрация: 08.12.2005 Откуда: Питер!
ValCoder писал(а):
MW! код подправил проект делай пустой вин32 консольное приложение тогда не нада будет автосоздаваемый stdafx
теперь вот ещё что-то ему не нравится попробовал исправить ошибки, так и не получилось
Код:
c:\documents and settings\bot\мои документы\visual studio 2005\projects\ma\ma\index.cpp(18) : error C2109: subscript requires array or pointer type c:\documents and settings\bot\мои документы\visual studio 2005\projects\ma\ma\index.cpp(18) : error C2109: subscript requires array or pointer type c:\documents and settings\bot\мои документы\visual studio 2005\projects\ma\ma\index.cpp(35) : error C2440: '=' : cannot convert from 'int *' to 'int' There is no context in which this conversion is possible c:\documents and settings\bot\мои документы\visual studio 2005\projects\ma\ma\index.cpp(35) : error C2440: '=' : cannot convert from 'int *' to 'int' There is no context in which this conversion is possible c:\documents and settings\bot\мои документы\visual studio 2005\projects\ma\ma\index.cpp(53) : error C2109: subscript requires array or pointer type c:\documents and settings\bot\мои документы\visual studio 2005\projects\ma\ma\index.cpp(57) : error C2664: 'mulmatr' : cannot convert parameter 2 from 'int' to 'int *' Conversion from integral type to pointer type requires reinterpret_cast, C-style cast or function-style cast c:\documents and settings\bot\мои документы\visual studio 2005\projects\ma\ma\index.cpp(63) : error C2109: subscript requires array or pointer type
п.с. создал пустой проект, у меня версия студии 8...
помогите решит сделать задачи
нужно сделать все вот это на visual basic for aplicatio
a) Найти последнее отрицательное число массива (выделить цветом), b) в каждой паре элементов массива поменять местами соседние элементы, c) найти элемент массива, который ближе всего к среднему значению.
Если можно с комментариями
* массив абсолютно любой
Junior
Статус: Не в сети Регистрация: 05.10.2007 Откуда: Москва
Привет всем! ))
Снова я села за задачки! И на этот раз более успешно, но все же требуется ваша помощь!
Visual Basic 6.0
ЗАДАЧА №1. Вот условие:
Цитата:
Протабулировать функцию f(x), сформировать одномерные числовые массивы x1, f(x1), отыскать max (min) элемент функции в массиве и запомнить его порядковый номер. Результаты вывести на экран дисплея. y=(x^3-0.3*x)/SQR(1+2*x) x=2,05
Я СДЕЛАЛА эту задачу! Только вот не могу сделать вот что: и запомнить его порядковый номер.
Вот текст моей программы:
Цитата:
Dim Y(10) x=2.05 for i=1 to 10 step 1 y(i)=(x^3-0.3*x)/SQR(1+2*x) max=-0.00000001 if y(i)>max then max=y(i) x=x+0.1 list1.additem "y(i)=" & y(i) next i list1.additem max & i
Все считает, максимум находит, выводит, подскажите, что нужно добавить в этот код, чтобы и запомнался и выводился порядковый номер максимума.
Задача№2. Условие:
Цитата:
Задавшись двумерным числовым массивом произвольной размерности (N,M), произвести его обработку в соответствии с условием задачи: просуммировать элементы строки матрицы B (N x M).
Помогите решить эту задачу, Пожалуйста... Дайте хотя бы намек, что делать мне, а то я совсем замучилась с этим злым преподом!
Буду премного благодарна любой помощи!
_________________ Я обновила свой комп! УРА! ))
В профиле подробности!
Member
Статус: Не в сети Регистрация: 15.10.2004 Откуда: Киев
Анжелика начнем с простого - задачка 2
Код:
dim n as integer'''''строк dim m as integer'''''столбцов dim i as integer dim j as integer n=5'либо если есть на форме текстбокс (допустим text1) ''''''''n=val(text1.text) m=6 ''''''''аналогично m=val(text2.text) - text2 тоже нарисовать надо redim arr(n-1,m-1) for i=0 to n-1 for j=0 to m-1 '''''''''здесь любая процедура заполнения члена массива arr(i,j) ''''''''для простоты - числом отфонаря [0...1000] arr(i,j)=int(rnd()*1000) next j,i '''''''задачa - просуммировать элементы строки матрицы B (N x M) '''''''для этого надо знать номер строки '''''''аналогично dim numstr as integer dim result as integer result=0 numstr=0'''0+1-первая строка '''''''либо опять же numstr=val(text3.text) for i=0 to m-1 result=result+arr(i,numstr)'позаботься о возможности обработки переполнения,допустим result чтоб был long или вооще int64 если это 8й бэйсик и инт по дефолту 32 бит next i list1.additem str(result) 'либо text4.text=str(result) 'либо form1.print str(result)
задачка номер 1 интереснее там как раз для такого дела есть метод ньютона посмотрю сегодня дома готовый код и напишу если с наскока - непонятно с каким шагом табулировать, где конец диапазона табуляции и максимум искать у функции на от резке или среди членов массива? а если твой код править то
Код:
Dim Y(10) as double dim x as double dim max as double dim min as double dim i as integer dim i_max as double dim i_min as double x=2.05 max=0:min=0 for i=0 to 10 y(i)=(x^3-0.3*x)/SQR(1+2*x) if y(i)>max then max =y(i):i_max=i if y(i)<min then min=y(i):i_min=i x=x+0.1 list1.additem "y(i)=" & y(i) next i list1.additem "max " & max & "at" & i_max list1.additem "min " & min & "at" & i_min
Мужики, выручайте! Есть лаба: Определить количество строк в матрице, имеющих четное число положительных элементов. И есть я, который не может сообразить как реализовать эту программу на паскале.
Помогите плиз с сишкой, куча прог еще осталась а не успеваю все написать... спасибки заранее...
Дана вещественная прямоугольная матрица размера M*N.
• Упорядочить столбцов матрицы по возрастанию первого элемента столбца методом прямого выбора.
• Найти номера строк и столбцов всех седловых точек матрицы.
• Исходные данные и результаты вывести на экран.
Member
Статус: Не в сети Регистрация: 15.10.2004 Откуда: Киев
GHO'st если с синтаксисом паскаля дружишь то переведешь:), на предыдущей странице я на си писал точно тоже, только там условие "имеющих хоть один отрицательный элемент" вместо "имеющих четное число положительных элементов"
и тебе не надо результат выводить а тока посчитать количество
если не поймешь могу алгоритм набросать....а с паскалем не дружил, не дружу, и не буду
Помогите пожалуста решить задачку в VBA!! Очень нужно!.....
Квадратная матрица. Найти максимальный элемент матрицы в главной диагонали матрицы. Вывести все элементы матрицы, начиная с цифры, вводимой с экрана по запросу пользователем, на остальных местах проставить нули. Вывести все строки матрицы, в которых есть нули.
Member
Статус: Не в сети Регистрация: 03.01.2005 Откуда: Из России
Привет всем...Народ помогите решить 3 задачки...Они простые, но вот только кроме VB6 я ничего не знаю...А задачки надо решить либо на Delphi либо на Паскале либо на СИ...помогите ребята, кто чем может...
Задача А
Имя входного файла: а.in
Имя выходного файла: а.out
Максимальное время работы на одном тесте: 1000 миллисекунд
Максимальный объем используемой памяти: 4096 килобайт
Составить программу, которая по заданным натуральным числам N и S найдет наименьшее число, большее N, сумма цифр которого равна S. Числа записываются в десятичной системе счисления.
Формат входных данных
Во входном файле в первой строке записано число S (0<S<40), во второй - число N (0<N<100000).
Формат выходных данных
В выходном файле должно содержатся одно число, которое является ответом.
Задача В
Имя входного файла: b.in
Имя выходного файла: b.out
Максимальное время работы на одном тесте: 1000 миллисекунд
Максимальный объем используемой памяти: 4096 килобайт
Незнайка записал натуральное десятичное число. Сможет ли Знайка переставить некоторые цифры местами и прибавить получившееся натуральное число (не начинающееся с нуля) к исходному так, чтобы сумма содержала только цифры "9"?
Формат входных данных
Данное число (не более 2001 знаков).
Формат выходных данных
Число -1 или число с переставленными цифрами.
Задача С. Таблица
Имя входного файла: c.in
Имя выходного файла: c.out
Максимальное время работы на одном тесте: 1000 миллисекунд
Максимальный объем используемой памяти: 4096 килобайт
Незнайка записал в таблицу N*N клеток целые числа от 1 до N (каждое - по N раз). Знайка хочет узнать, сколько среди чисел от 1 до N встречается в каждой строке ровно по одному разу.
Формат входных данных
В первой строке - число N (не больше 100), в следующих N строках - таблица, записанная Незнайкой.
Формат выходных данных
Количество чисел, встречающихся в каждой строке по одному разу.
Member
Статус: Не в сети Регистрация: 30.09.2005 Откуда: Кемерово
Помогите решить задачу( TP 7.0). Или напомните как цикл делоть с шагом в 100.
Плотность воздуха убывает с высотой h по закону: . Считая, что =1.29 кг/м3, z=1.25*10-4 1/м, напечатать таблицу зависимости плотности от высоты для значений от 0 до 1000 м, с шагом 100 м.
_________________ Я бегу от себя от этой жуткой реальности. В нормальном состоянии я чую прифкус ненормальности....
Вот 1 задача:
Определить, является ли целое число N четным двузначным числом?
2 задача:
Дан круг радиуса R. Определить, поместится ли правильный треугольник со стороной "а" в этот круг?
Заранее Спасибо!!!
P.S. Задачи нужно решить на Turbo Pascal
Member
Статус: Не в сети Регистрация: 08.07.2003 Откуда: Новосибирск
Ну чтоб такое не решить - я не знаю...
С паскаля к сож не начинал, если знаешь хоть немного язык...в первой два условия - будет ли число, полученное от N/2 находиться в интервале 5>=x<=49, и будет ли оно целым (остаток от деления = 0)...вторая - если R >= a*sqrt(3)/3, то можно.
Junior
Статус: Не в сети Регистрация: 05.10.2007 Откуда: Москва
ValCoder А вот и я! )
Приветик, приветик ValCoder !
ValCoder писал(а):
задачка номер 1 интереснее там как раз для такого дела есть метод ньютона посмотрю сегодня дома готовый код и напишуесли с наскока - непонятно с каким шагом табулировать, где конец диапазона табуляции и максимум искать у функции на от резке или среди членов массива?а если твой код править то
Пасибочки тебе большое за это! Я еще немного подправила твой код, упростила и все, сделала, сдала!
ValCoder писал(а):
начнем с простого - задачка 2
Эту задачку, честно говоря, как ты написал, я НЕ поняла, не разобралась!
Короче я сделала ее по своему, очень примитивно, но просто!
там в середине только добавила
"S=0
S=S+y(i)"
и все! Пошел пересчет! В общем я это тоже сделала и сдала!
БОЛЬШОЕ тебе СПАСИБО ValCoder !
Все, теперь я сделала все задачки, которые нужно было сделать до конца декабря!
То есть я могу быть свободна и больше не посещать эту тупую практику, но с одним НО!
Препод дал ИНДИВИДУАЛКУ, то есть особенное задание!
Оно не слишком сложное, но мудреное!
Короче, если я сделаю его, то могу до конца декабря не посещать занятия, и только в конце декабря подойти, поставить зачет в зачетку и гулять!
Эту индивидуальную задачу я сделаю думаю, я чувствую в Себе Силы! ну или если мне понадобится все-таки ваша бесценная помощь, то я напишу сюда, ладно? ладно, пойду, скачаю где-нибудь Вижуал Бейсик 6.0 и подумаю над задачей.
Скачать Visual Basic 6.0 то не больно удается! Не найти его нигде в нете!
Или это запретная прога для свободного скачивания, как и платные проги? А?
_________________ Я обновила свой комп! УРА! ))
В профиле подробности!
№2. Выбрать из ряда цифр 4, 6, 8, 10, 12....30. Любое число!
Вот это я не знаю, как сделать, помогите тут!
№3. Создать 3 переключателя, которые будут такими:
1) R=a, r1=0.095a
2) R=0.9a, r1=0.17a
3) R=0.8a, r1=0.15a
Это я тоже не знаю, как сделать! Вернее, как создать переключатели то я знаю, а вот как сделать, чтобы они функционировали, нет!... Помогите...
№4. Найти S1=(a*b*c)/(d*e)
это я впринципе знаю примерно, как составить формулу.
Самое главное, подскажите плийз, пункты №2 и №3, то есть как выбрать из ряда цифр любое число? моя интуиция, подсказывает, что тут матрицу нужно сделать, верно?
И второе главное, как сделать функциональными переключатели? Надеюсь на вашу посильную помощь!
_________________ Я обновила свой комп! УРА! ))
В профиле подробности!
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете добавлять вложения