Для создания архива данных, будем использовать программу WinRar:
1. Открыть программу. 2. В главном меню нажать на вкладку - Команды, затем добавить файлы к архиву 3. Выбираем директорию на которой хранится наш файл. 4. Настраиваем архив (формат. пароль метод сжатия и т.д.).
1. Правой кнопкой мыши по файл, который хотим заархивировать. 2. Выбрать пунк Добавить к Архиву 3. Выбираем директорию на которой хранится наш файл. 4. Настраиваем архив (формат. пароль метод сжатия и т.д.).
Для создания CD/DVD-R,RWдиска с данными выполним следующие действия: Используем программу ImgBurn 1. Приобретаем диск 2. Помещаем компакт-диск в привод 3. Выбираем соответствующие дальнейшие действия с нашим диском. Мы записываем информацию. Выбираем "Записать Файла/Папки на диск" 4. Выбираем директорию хранения предварительной записываемой информации. 5. В правом блоке информации, проверяем размеры файлов, что бы не превышали размерности компакт-диска. 6. Файл - Записать 5. Получаем отсчет о записи, удостоверяемся что запись без ошибок.
В Бейсике есть встроенная функция ATN - арктангенс, поэтому угол можно в градусах посчитать.
DIM a, b, c, cs, cst, ang, PI INPUT " a = ", a INPUT " b = ", b INPUT " c = ", c PRINT PI = 3.141593 cs = (b * b + c * c - a * a) / (2 * b * c) cst = cs IF cs < 0 THEN cst = SQR(1 - cs * cs) ang = ATN(SQR(1 - cst * cst) / cst) * 360 / (2 * PI) IF cs < 0 THEN ang = ang + 90 PRINT "угол A = ", PRINT USING "###.##"; ang cs = (a * a + c * c - b * b) / (2 * a * c) cst = cs IF cs < 0 THEN cst = SQR(1 - cs * cs) ang = ATN(SQR(1 - cst * cst) / cst) * 360 / (2 * PI) IF cs < 0 THEN ang = ang + 90 PRINT "угол B = ", PRINT USING "###.##"; ang cs = (a * a + b * b - c * c) / (2 * a * b) cst = cs IF cs < 0 THEN cst = SQR(1 - cs * cs) ang = ATN(SQR(1 - cst * cst) / cst) * 360 / (2 * PI) IF cs < 0 THEN ang = ang + 90 PRINT "угол C = ", PRINT USING "###.##"; ang PRINT "Выход - любая клавиша ... " DO LOOP WHILE INKEY$ = ""
