Первые программы на Qbasic

 

Министерство образования и науки

Росийской Федирации

ФГАОУ ВПО «Уральский Федеральный университет имени первого Президента россии Б.Н. Ельцина»

Кафедра интелектуальных информационных технологий

Дисциплина «Информатика»








ЛАБОРАТОРНАЯ РАБОТА №1


Вариант 9


«Первые программы на Qbasic»



Студент Д.А. Русинов

Группа Мт-110602

Преподаватель Д.В. Опарин






Екатеринбург 2011г.


Цель работы: первоначальное знакомство с работой программ, написанных на языке Qbasic.


Задание


Ознакомиться с работой программ, написнных на языке Qbasic. На основе программы, рисующей российский флаг, создать программу, позволяющую получить изображение флага Норвегии.


Алгоритм:














Лабораторная работа 1


Флаг Норвегии

: SCREEN 123, 4: PRINT "Флаг Норвегии"

Красная полоса(80, 100)-(550, 370), 4, BF

белые полосы(200, 100)-(290, 370), 15, BF(80, 190)-(550, 280), 15, BF

синие полосы(80, 210)-(550, 260), 1, BF(220, 100)-(270, 370), 1, BF


Результат работы программы


В результате работы программы на экране получается изображение флага Норвегии.




Цель работы: освоение порядка работы в среде системы программирования QBasic, овладение практическими навыками разработки и программирования вычислительного процесса линейной и разветвляющейся структур.


Задание


Набрать программу вычисления площади треугольника s по формуле Герона


Алгоритм:







Нет Да











Лабораторная работа 2


CLS

5 : INPUT "Введите сторону треугольника a"; a "Введите сторону треугольника b"; b

INPUT "Введите сторону треугольника c"; c IF a < 0 OR b < 0 OR c < 0 OR a + b < c OR a + c < b OR b + c < a THEN"Неверный ввод данных, повторите заново"5IF= (a + b + c) / 2= SQR(p * (p - a) * (p - b) * (p - c))USING "Площадь треугольника #####.##"; s


Цель работы: овладение практическими навыками разработки и программирования вычислительного процесса разветвляющейся и циклической структур.


Задание


Протабулировать функцию в соответствии с вариантом задания путем многократного вычисления ее значения при изменении аргумента в заданном диапазоне с заданным шагом (параметры, диапазон (начальное и конечное значения) и шаг изменения аргумента ввести с клавиатуры). Использовать один из трех операторов цикла for - next, while - wend, do - loop (по ука-занию преподавателя). Проверить правильность работы программы, протестировав все три ветви алгоритма. Организовать вывод значений аргумента и вычисленных значений функции в виде таблицы.


Алгоритм:













да



да



да







Лабораторная работа 3


CLS"Введите а"; a" Введите начальное значение х"; x1" Введите конечное значение ч"; x2" Введите шаг"; x3"Таблица функции Y(X)"" X Y "= x1WHILE x < x2 + x3 / 2x < .85 THEN= (SIN((ABS(a * x)) ^ (1 / 2))) ^ 2IFx >= .85 AND x <= 1.15 THEN= a + 1IFx > 1.15 THEN= LOG(x + 1)IFUSING "####.## ####.####"; x; y= x + x3


Цель работы: овладение практическими навыками работы с одномерными массивами, изучение особенностей их ввода и вывода, приобретение навыков по организации программ циклической структуры с использованием типовых алгоритмов вычислений.


Задание


Обработать на компьютере одномерный массив в соответствии с вариантом задания. Размер исходного массива n и его элементы ввести с клавиатуры. Вывести на экран монитора исходный массив и все результаты с наименованиями выводимых величин. Проверить правильность работы программы с помощью тестового варианта.



Алгоритм:






























Лабораторная работа 4

алгоритм массив функция программирование

CLS"Введите количество элементов в массиве n"; ni = 1 TO na(i)i"Исходный массив"i = 1 TO nUSING "#####.##"; a(i);i= 1i = 1 TO na(i) >= a(imax) THEN= a(i)= iIFi(imax) = a(n)(n) = max"Массив после перестановки"i = 1 TO nUSING "#####.##"; a(i);iUSING "Максимальный элемент #####.## его номер ##"; max; imax;


Министерство образования и науки Росийской Федирации ФГАОУ ВПО «Уральский Федеральный университет имени первого Президента россии Б.Н. Ельцина»

Больше работ по теме:

КОНТАКТНЫЙ EMAIL: [email protected]

Скачать реферат © 2017 | Пользовательское соглашение

Скачать      Реферат

ПРОФЕССИОНАЛЬНАЯ ПОМОЩЬ СТУДЕНТАМ