Отправляет email-рассылки с помощью сервиса Sendsay

Basic/visual basic. Основы программирования.

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Visual Basic для новичков и профессионалов" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Октябрь 2004   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Автор
Евгений

Статистика

1.585 подписчиков
-7 за неделю
←   Все выпуски   →

Решение задач (линейные алгоритмы)


Информационный Канал Subscribe.Ru

Basic/visual basic. Основы программирования.

Выпуск 3
Здравствуйте, уважаемые подписчики. Извините за долгую задержку выхода выпусков. Была взята пауза, необходимая потому, что рассылка была переведена в категорию "Серебряные" и число подписчиков возрасло со 100 до 1000 человек. Спасибо за ваше внимание к рассылке.
В этом выпуске:
Решение задач (линейные алгоритмы)
Стандартные функции и процедуры
Математические функции
Логические функции
Задачи
Решение задач.

2.1 Даны длины трех сторон треугольника. Найти его площадь.

a=3
b=4
c=5
s=sqr((a+b+c)/2*(b+c-a)/2*(a+c-b)/2*(a+b-c)/2) 'формула Герона
? s
end

Здесь ' комментарий в теле программы
end - окончание программы

2.2 Написать программу, переводящую угол из градусов в радианы. Значение в градусах вводить с клавиатуры.

const pi=3.1415
input "Введите значение угла в градусах"; a
b=pi*a/180
? b
end

2.3 Найти длину диагонали параллелепипеда со сторонами a, b, c. (Ввод с клавиатуры).

input "Введите длины сторон параллелепипеда"; a,b,c
l=sqr(a^2+b^2+c^2)
? l
end

2.4 Даны длины сторон треугольника. Найти косинусы его углов.

a=3
b=4
c=5
ccos=(a^2+b^2-c^2)/(2*a*b) ' теорема косинусов
bcos=(a^2+c^2-b^2)/(2*a*c)
acos=(c^2+b^2-a^2)/(2*c*b)
? acos, bcos, ccos
end

2.5 Даны две целочисленные переменные. Требуется поменять местами их значения, не используя новых переменных.

a=2
b=3
a = a + b
b = a - b
a = a - b
? a,b
end
Тема этого выпуска - стандартные функции и процедуры.
До этого момента мы имели дело только с отдельными командами - операторами. Теперь познакомимся со стандартными наборами операторов - процедурами и функциями. Функция - это набор команд, который по введенным значениям одной или нескольких переменных выдает некоторое значение. Процедура - выполняет определенные действия, но не выдает значения.
Заранее определенные функции и процедуры называются стандртными.
Вызов (обращение к функции) происходит следующим образом:
имя_функции(значение)
Например: a=abs(x) - переменной a присваивается значение модуля x.
Ниже приведены основные математические и логические функции.
Их список также можно найти здесь:
математиеские
логические
Математические функции

Функция Описание
ABS Модуль (абсолютная величина) числа.
ATN Арктангенс. Возвращает значение угла в радианах.
COS Косинус.
SIN Синус.
TAN Тангенс
EXP Возводит число е (основание натурального логарифма) в степень, заданную аргументом (не более 88.02969)
LOG Натуральный логарифм.
SQR Квадратный корень.
SGN Знак числа. Возвращает 1, если аргумент положителен, 0 — если равен нулю, -1 — если отрицателен.
RND Возвращает случайное число в диапазоне от 0 до 1. Необходима инициализация генератора случайных чисел - оператор RANDOMIZE.
FIX Целая часть аргумента, получаемая отбрасыванием дробной части. Например: FIX(3.99) равно 3; FIX(-3.99) равно -3
INT Максимальное целое, меньшее или равное аргументу. Например: INT(3.99) равно 3; INT(-3.99) равно -4

Логические функции.

Левая часть Правая часть NOT AND OR XOR EQV IMP
0 0 1 0 0 0 1 1
0 1 1 0 1 1 0 1
1 0 0 0 1 1 0 0
1 1 0 1 1 0 1 1

*Примечание:Функцию NOT применяем к операнду, стоящему в левой части.
Вызов логических функций происходит следующим образом: a = x or y - переменной а присвоить результат дизъюнкции х и у.
Задачи.
3.1 Заданы уравнения двух пересекающихся прямых на плоскости: y=k1+b1, y=k2+b2. Найти угол между ними, используя формулу tg = (k2-k1)/(1+k1*k2).
3.2 Найти угол между векторами А(x1,y1,z1) и В(x2,y2,z2).
3.3 Ввести с клавиатуры числа a, b. Вычислить логарифм b по a.
3.4 Решить задачу 2.5 из предыдущего выпуска с использованием логических функций.
3.5 Сравнить две переменные без использования условного оператора (Мы его еще не проходили).
Архив рассылки доступен по адресу http://tutor.subwwway.net/
Выпуск завершен. Желаю успехов!
http://subscribe.ru/
http://subscribe.ru/feedback/		 Подписан адрес:
Код этой рассылки: comp.soft.prog.basicandvb		 Отписаться
В избранное