PRINT "Н" 14, 2: PRINT "А" 15, 2: PRINT "Я" 16, 2: PRINT "" 17 , 2: PRINT "Т" 18, 2: PRINT "А" 19, 2: PRINT "Б" 20, 2: PRINT "Л" 21, 2: PRINT "І" 22, 2: PRINT " ; Ц "23, 2: PRINT" А "
LINE (248, 0) - (630, 464), 7, B2, 38: PRINT "----- ДОДАТКОВА ІНФОРМАЦІЯ -----"
LOCATE 7, 50: PRINT "Коефіцієнти:" 910, 53: PRINT "A ="; A12, 53: PRINT "B ="; B14, 53: PRINT "C =" ; C152, 9: PRINT "t" 2, 20: PRINT "Y (t)" = 4IFI, 6: PRINT Range (K * Tkv, 3) I, 16: PRINT Range (YBlock (K), 3 ) = I + 2 = K + 1INKEY $ <> CHR $ (13) (MI-1) SUB
Пояснення
При завданні параметрів задачі потрібно враховувати що для уникнення некоректної роботи програми змінні програми можуть приймати наступні значення:
В
Параметри, і повинні бути обрані таким чином, що.
Процедури та функції:
SUB Delay (Time!) - тимчасова затримка. У процедурі використовується тимчасова константа TConst, оголошена в основній програмі. Параметр Time - час у секундах. p> BaseF! (K!) - тимчасова функція. Використовується для побудови лінії графіка. Параметр K - значення аргументу. Повертає значення функції для аргументу K.
FUNCTION Range! (K!, Range!) - Повертає K, відкидаючи всі знаки після коми, починаючи з Range. p> SUB Scale (A!, B!, C!, MaxT!, Tkv!) - масштабування графіка. Параметри: A, B, C - коефіцієнти функції, MaxT - найбільше можливе значення часу, Tkv - час квантування. Обчислює коефіцієнти масштабування ScX, ScY.Grid () - малювання координатної сітки з нанесеними значеніямі.MessageBox (Message $) - висновок повідомлення. Параметр - текстова змінна, що містить сообщеніе.MainRef (MenuItem!) - оновлення основного меню. Параметр - номер елемента меню.Text () - виведення текстового повідомлення, що містить умову задачі.StData () - завдання параметрів завдання з условію.Main () - основна процедура, що містить механізм меню.DataOut () - виведення вікна з таблицею параметрів задачі. DataIn () - завдання параметрів задачі.Outro () - виведення повідомлення про завершення программи.Work (Time!) - процедура обчислення значень функції в основних точках і малювання графіка в машинному або реальному часі. Параметр - час у секундах. p> FUNCTION RootSum! (A!, B!, C!) - Повертає суму коренів квадратного рівняння. Параметри - коефіцієнти квадратного рівняння. Iteration! (XBeg!, XEnd!, Eps!) - Повертає корінь нелінійного рівняння, що лежить в діапазоні [XBeg; XEnd], обчислений методом простих ітерацій з точністю Eps. p> SUB Intro () - виведення титульного аркуша.
Графік тимчасової функції
програма обчислювальний функція
В
Висновок
Світовий і вітчизняний досвід підготовки фахівців в області комп'ютерної науки та комп'ютерної інженерії підтверджує целесо-образність і ефективність розуміння основ програмування на більш простих і базують мовах програмування, одним з яких є Basic. На прикладі даної програми, написа...
