Dinaro4ka
Новичок
|
    
Ребят, а QBasic тоже здесь писать или куда вообще? Просто я в этом вообще ничего не понимаю..((
Помогите, пожалуйста, решить систему из 4 уравнений методом прогонки ( итерационным методом с точностью 0,01). очень надо!
7*X1-2*X2=5
-2*X1+12*X2+4*X3=8
X2-6*X3+X4=2
3*X3+5*X4=4
|
Всего сообщений: 2 | Присоединился: декабрь 2008 | Отправлено: 20 дек. 2008 0:10 | IP
|
|
Vasiliy X
Новичок
|
Надо написать 3 программы на языке Turbo Basic... Выручайте....
1) Прстроить график функции y=5/(2+Х*Х*Х)+1. В интервалах знакопостоянства, где y>0, график функции начертить красным цветом; где y<0, синим.
2) Создайте образ шарика, удаляющегося от наблюдателя.
(Только, чтоб не менялся радиус круга)
3) Постройте семейство графиков функций Y=ax^2+bx+c при а=-1; b=4; и различных значениях С. Определите значение С, при котором изменяется число корней функции. Проиллюстрировать.
P.S. Народ, пожалуйста! Распишите программы поподробней...
|
Всего сообщений: 11 | Присоединился: ноябрь 2008 | Отправлено: 22 дек. 2008 16:34 | IP
|
|
aly17
Участник
|
аааааа!!!!помогите!!!!готовлюсь к экзамену!!!задачка не получается!((((
Дана матрица A размером 5*7. Сформировать одномерный массив B размером 5 по следующему правилу: если первый элемент строки матрицы положительный, то в соответствующий элемент массива B поместить сумму элементов строки, расположенных после максимального элемента этой строки; в противном случае – 0.
|
Всего сообщений: 107 | Присоединился: декабрь 2008 | Отправлено: 2 янв. 2009 17:51 | IP
|
|
Old
Долгожитель
|
Цитата: aly17 написал 2 янв. 2009 17:51
аааааа!!!!помогите!!!!готовлюсь к экзамену!!!задачка не получается!((((
Дана матрица A размером 5*7. Сформировать одномерный массив B размером 5 по следующему правилу: если первый элемент строки матрицы положительный, то в соответствующий элемент массива B поместить сумму элементов строки, расположенных после максимального элемента этой строки; в противном случае – 0.
for i=0 to 6
if a(i,j)>=0 then m=a(i,j)
for j=0 to 4
if a(i,j)>=m then m=a(i,j):jj=j else next
for j=jj+1 to 4
s=s+a(i,j)
next
b(i)=s
s=0
else next
Не прогонял, так как давно нет Бейсика, да и синтаксис подзабыл, так что нужно отладить.
|
Всего сообщений: 285 | Присоединился: ноябрь 2006 | Отправлено: 9 янв. 2009 3:37 | IP
|
|
aly17
Участник
|
помогите пожал с задачкой!!!
Найти корень уравнения f(x)=0 для функции 3x-4lnx-5 ( интервал изоляции корня [2;4] ) методом Ньютона с точностью 0.0001
|
Всего сообщений: 107 | Присоединился: декабрь 2008 | Отправлено: 12 фев. 2009 19:52 | IP
|
|
kes2006
Новичок
|
помогите пожалуйста не могу понять в чем ошибка не считается крайнее значение x=1,8 в интервале от -3 до 1,8 с шагом 0,6 вот сама задачаPublic Sub zadacha1()
Dim a, b, x0, xk, dx, x, y As Single
Cells(1, 1).Value = "a"
Cells(1, 2).Value = "b"
Cells(1, 3).Value = "x0"
Cells(1, 4).Value = "xk"
Cells(1, 5).Value = "dx"
a = Cells(2, 1).Value
b = Cells(2, 2).Value
x0 = Cells(2, 3).Value
xk = Cells(2, 4).Value
dx = Cells(2, 5).Value
x = x0
i = 4
10 If x > 0 Then
y = Sqr(b ^ 3) / x + Sin(a * x / 9)
Else
y = Sqr(b ^ 3) / x + Sin(a * x / 9)
End If
Cells(4, 1).Value = "x"
Cells(4, 2).Value = "y"
Cells(i + 1, 1).Value = x
Cells(i + 1, 2).Value = y
If x <> 0 Then
End If
Cells(10, 2).Value = "otvet net"
i = i + 1
x = x + dx
If x <= xk Then GoTo 10
End Sub
|
Всего сообщений: 14 | Присоединился: февраль 2009 | Отправлено: 7 марта 2009 19:18 | IP
|
|
22051988
Новичок
|
Помогите пож. решить задачи в QBASIC:
1. Числовые ряды
Проверить равенство
1^2+3^2+5^2+....+(2n-1)^2=(n(4n^2-1))/3
2. Обработка одномерных массивов
Даны вершины треугольника A(X1,X2,...x n),B(y1,y2...y n) и C(z1,z2...z n) . Найти координаты точки D(d1,d2...d n) пересечения биссектрисы угла А со стороной ВС. z i=(x i+Uy i)/1+U , где U=|AC|/|AB| и длину биссектрисы АД.
3. Матрицы
Для заданной квадратной матрицы сформировать одномерный массив из ее диагональных элементов. Найти след матрицы, суммируя элементы одномерного массива.
(Сообщение отредактировал 22051988 3 мая 2009 20:58)
|
Всего сообщений: 1 | Присоединился: май 2009 | Отправлено: 3 мая 2009 20:50 | IP
|
|
valera72
Новичок
|
ни чего в этом не понимаю, но надо Составить алгоритм и программу вычисления произведения цифр заданного целого четырехзначного числа, где – число отрицательное -1367, в среде программирования QBasic. Представить текст программы в электронном виде.
|
Всего сообщений: 1 | Присоединился: апрель 2010 | Отправлено: 19 апр. 2010 10:26 | IP
|
|
MaKu
Новичок
|
Помогите пожалуйста, вопрос жизни и смерти(решается судьба годовой оценки)
В квадратной матреце 7х7
1) подсчитать кол-во едениц на главной диагонали.
2) найти произведение элементов побочной диагонали.
3) определить максимальный элемент среди элементов над главной диаганалью.
4) поменять местами 1-й и 4-й столбцы.
5) удалить 4 строку.
6) подсчитать среднее арифметическое преобразованной матрицы.
7) вставить 2-ой столбец с клавиатуры.
|
Всего сообщений: 1 | Присоединился: апрель 2010 | Отправлено: 23 апр. 2010 14:34 | IP
|
|
zxcvbnm
Новичок
|
Помогите, пожалуйста, решить на QBASICe : составить программу,которая замещает подряд идущие буквы "к" на одну "к"
|
Всего сообщений: 50 | Присоединился: май 2010 | Отправлено: 17 июня 2010 20:03 | IP
|
|
|
Форум
Решение задач на Basic
