Даны вещественные числа A, B и целое число N. Создать текстовый файл, содержащий таблицу значений функции - VB

Формулировка задачи:

Даны вещественные числа A, B и целое число N. Создать текстовый файл, содержащий таблицу значений функции √x на промежутке [A, B] с шагом (B-A)/N. Таблица состоит из двух столбцов: с аргументами x (10 позиций, из них 4 под дробную часть) и со значениями √x (15 позиций, из них 8 под дробную часть). Столбцы выравниваются по правому краю. Заранее огромное спасибо.

Код к задаче: «Даны вещественные числа A, B и целое число N. Создать текстовый файл, содержащий таблицу значений функции - VB»

textual
В данном примере показаны различные способы использования инструкции Open, чтобы разрешить выполнение операций ввода/вывода с файлом.
Следующие инструкции открывают файл TESTFILE для последовательного чтения.
 
Open "TESTFILE" For Input As #1
' Закрывает файл перед повторным открытием в другом режиме.
Close #1
 
Следующие инструкции открывают файл в режиме Binary только для записи.
 
Open "TESTFILE" For Binary Access Write As #1
' Закрывает файл перед повторным открытием в другом режиме.
Close #1
 
Следующие инструкции открывают файл в режиме Random.  Файл содержит записи определенного пользователем типа Record.
 
Type Record ' Тип, определенный пользователем.
    ID As Integer
    Name As String * 20
End Type
 
Dim MyRecord As Record  ' Объявляет переменную.
Open "TESTFILE" For Random As #1 Len = Len(MyRecord)
' Закрывает файл перед повторным открытием в другом режиме.
Close #1
 
Следующие инструкции открывают файл для последовательного вывода; любой процесс может читать из этого файла или записывать в него.
 
Open "TESTFILE" For Output Shared As #1
' Закрывает файл перед повторным открытием в другом режиме.
Close #1
 
Следующие инструкции открывают файл в режиме Binary для чтения; другие процессы не могут читать этот файл.
 
Open "TESTFILE" For Binary Access Read Lock Read As #1
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

15   голосов, оценка 3.933 из 5


СДЕЛАЙТЕ РЕПОСТ