Главная » 2011 » Ноябрь » 17 » Добавлены новые форумы "Программирование на VB" и "Подготовка к ЕГЭ"
23:41
Добавлены новые форумы "Программирование на VB" и "Подготовка к ЕГЭ"
На этих форумах можно разместить свои программы, написанные на Visual Basic и решения задач по математике из сборника по подготовке к ЕГЭ 2012. Для учащихся нашей школы есть реальная возможность улучшить свои оценки.
www.computer.md Россия,Москва,Воробьёвы горы www.geocam.ru Россия,Санкт-Петербург,Смольный Собор,Нева www.camvista.com Англия,Лондон,Трафальгарская площадь
http://www.geocam.ru/view/cam881x6097_stolypin_square_webcam_in_saratov.html -- Веб-камера Площадь Столыпина г.Саратов http://www.geocam.ru/view/cam882x6097_lenin_square_webcam_saratov.html -- Веб-камера Площадь Ленина г.Саратов http://www.geocam.ru/view/cam903x6460_quotnew_wavequot_radio_station_webcam.html --Веб-камера радиостанции "Новая Волна" Волгоград
Вариант №10 В7. 3^(√3-1)*3^(3-√3)=3^2=9 √3-1+3-√3=-1+3=2 Ответ: 9 В8.. На промежутке [—2; 5] точек функция у = f(x) имеет экстремумы в точках: F max=-1, F min=1, F max=4. Их сумма равна (-1) + 1 + 4 = 4 Ответ: 4 В11. Найти наименьшее значение функции y = 6x^2-x^3 на отрезке [-2;3] y’= (6x^2-x^3) = 12x-3x^2 12x-3x^2 = 0 3x(4-x) = 0 3x = 0 или 4-x = 0 x = 0 -x = -4 x = 4 F(-2) = 6*〖(-2)〗^2-〖(-2)〗^3 = 6*4-(-8) = 24+8 = 32 F(3) = 6*3^2-3^3= 6*9-27 = 54-27 = 27 F(0) = 6*0^2-0^3= 6*0-0 = 0 Наименьшее значение в точке = 0 Ответ: 0
В12. Автобус, выехавший из В, проехал (270 — 140) = 130 (км). Его ско¬рость равна 130 : 2,5 = 52 (км/ч). Ответ: 52
Const g As Single = 9.81 Const Pi As Single = 9.34 Dim V0, A, S, L As Double Private Sub ComdCalc_Click() 'Ввод начальных значений V0 = Val(txtV0.Text) A = Val(txtA.Text) S = Val(txtS.Text) H = Val(txtH.Text) 'попадание в площадку L = S * Tan(A * Pi / 180) - (g * S ^ 2) / (2 * V0 ^ 2 * Cos(A * Pi / 180) ^ 2) TextL.Text = L Select Case L Case Is < 0 TextM.Text = "недолёт" Case Is > H TextM.Text = "перелёт" Case Else TextM.Text = "Попадание" End Select End Sub 'построение графика For t = 0 To 10 Step 0.1 y = V0 * Sin(A * Pi / 180) * t - g * t * t / 2 x = V0 * Cos(A * Pi / 180) * t picl.Scale (0, 15)-(S + 5, -5) picl.PSet (x, y) Next I 'Ось X picl.Line (0, 0)-(50, 0) For I = 0 To 50 Step 5 picl.PSet (I, 0) picl.Print I Next I 'ось Y picl.Line (0, -5)-(0, 15) For I = -5 To 15 Step 5 picl.PSet (0, I) picl.Print I Next I 'мишень picl.Line (S, 0)-(S, H) End Sub