) = 452.5814 = 5.5 => Y (t) = 516.1767 = 5.75 => Y (t) = 585.5283 = 6 => Y (t) = 660.8892 = 6.25 => Y (t) = 742.5126 = 6.5 = > Y (t) = 830.6517 = 6.75 => Y (t) = 925.5595 = 7 => Y (t) = 1027.489
Висновок
Світовий і вітчизняний досвід підготовки фахівців в області комп'ютерної науки та комп'ютерної інженерії підтверджує целесо-образність і ефективність розуміння основ програмування на більш простих і базують мовах програмування, одним з яких є Basic. На прикладі даної програми, написаної мовою Basic, показаний нескладний обчислювальний процес, що дозволяє забезпечити побудову графіка тимчасової функції, що працює як в машинному, так і в реальному часі. p align="justify"> Список використаних джерел
1.Jr. Ruder, C. Millsap. В«BASIC for the IBM PCВ»: пров. з англ. - М.: В«Радіо і зв'язокВ», 1991. p> 2.Пособіе з математики для вступників до ВНЗ./Под ред. Г.Н. Яковлєва. - М.: В«НаукаВ», 1985. p>. Мови BASIC В.К. Алієв СОЛОН - P М., 2000. p align="justify"> Додаток
Лістинг програми.
Компонування програми (з роздруківкою лістингу)
Програма написана мовою Quick BASIC, що дозволило винести всі підпрограми за межі основної програми, не виділяючи їх в окремі файли. Лістинг кожної підпрограми можна побачити, вибравши в меню VIEW опцію SUBS ... і потім назву потрібної підпрограми. p align="justify"> Далі наводяться листинги основної програми і підпрограм.
Лістинг основної програми
????????????????????
? Основна програма?
???????????????????? SUB Titul () SUB RootSum () SUB Uravnenie () SUB MassK () SUB MassY () FUNCTION Gorner (t) SUB Graf () SUB Tim () SUB Rezultat () SHARED d, g, t0, tkon, tk AS SINGLE, k (1 TO 4) AS SINGLESHARED Y (0 TO 30) AS SINGLE
Graf
'---------- Обчислення значень багаточлена за схемою Горнера -------------
FUNCTION Gorner (t) = 0i = 1 TO 4 = Y * t + k (i) i = YFUNCTION
'------------------------- Висновок графіка -------------- --------------------- Graft AS SINGLE, i AS SINGLE, j AS SINGLE
CLS99, 25 "Побудова графіка:"
PRINT "1) - в реальному часі" "2) - у машинному часу"
PRINT "Введіть № варіанту:", vv <> 1 AND v <> 2 THEN 30
SCREEN 12 = tkon
'Визначення масштабу по осі
x0 = 80 = 80 = (640 - 4 * x0)/(t/tk) = (480 - 2 * y0)/ABS (Gorner (t))
'Вертикальна разметкаi = 1 TO t
LOCATE 27, (9 + 5.8 * i) ii (x0, y0 - 20) - (x0, 488 - y0), 5 (x0, y0 - 20) - (x0 - 4, y0 - 5), 5 (x0, y0 - 20) - (x0 + 4...
