Построить на экране розу ветров по заданным натуральным числа к1,…к8, определяющим северное, северо-восточное, восточное, юго-восточное, южное, юго-западное, западное или северо-западное направление. Числа считываются из текстового файла.
Либо распишите каждую строчку (что они значат):
dim as string s
dim as single d,t
Dim x(8)
For t = 1 To 8
Input(s)
x(t) = Val(s)
Next
Screen(12)
d = 6.28 / 8
For t = 1 To 8
line (320,240)-(320+sin(d*t)*x(t)*10,240+cos(d*t)*x(t)*10)
Next
Input(zzz)
Другие языки программирования и технологии
Помогите. Выполнить обязательно в Visual basic. Даже не Free basic. Либо помогите расписать каждую строчку кода.
dim as string s * объявили (создали) строковую переменную s
dim as single d,t * создали две переменные для хранения чисел типа Single
Dim x(8) * создали массив, но непонятно какого типа
For t = 1 To 8 * цикл 8 раз, но переменная t должна быть типом Integer
Input(s) * просим пользователя ввести строку (наверно строка в виде числа)
x(t) = Val(s) * преобразуем строку в число и заносим в массив
Next * это конец цикла, идем далее
Screen(12) * устанавливаем режим экрана 12
d = 6.28 / 8 * выполняем арифметическое действие и результат присваиваем
For t = 1 To 8 * цикл
line (320,240)-(320+sin(d*t)*x(t)*10,240+cos(d*t)*x(t)*10) * рисуем
Next
Input(zzz) * это бред, переменная zzz не объявлялась ранее...
Basic, это язык, который легко переводится с английского.
Line - линия
Input - ввод
For - для
To - до
Next - следующий
Даже не зная бейсика как такового, можно со словарем
перевести и понять о чем идет речь.
Учтите, что Free Basic и Visual Basic, это разные диалекты и алгоритмические
конструкции у них то же немного разные. Например, в Visual Basic 6.0
переменные объявляются так:
Dim s As String
Dim t As Integer, d As Single
Dim x (1 To 9) As Single ' массив из девяти элементов (1-9) для хранения значений с плавающей запятой.
А в Visual Basic .NET массивы начинаются только с нуля
Dim x (9) As Integer ' объявлен массив из 10 элементов (0-9) целого типа.
dim as single d,t * создали две переменные для хранения чисел типа Single
Dim x(8) * создали массив, но непонятно какого типа
For t = 1 To 8 * цикл 8 раз, но переменная t должна быть типом Integer
Input(s) * просим пользователя ввести строку (наверно строка в виде числа)
x(t) = Val(s) * преобразуем строку в число и заносим в массив
Next * это конец цикла, идем далее
Screen(12) * устанавливаем режим экрана 12
d = 6.28 / 8 * выполняем арифметическое действие и результат присваиваем
For t = 1 To 8 * цикл
line (320,240)-(320+sin(d*t)*x(t)*10,240+cos(d*t)*x(t)*10) * рисуем
Next
Input(zzz) * это бред, переменная zzz не объявлялась ранее...
Basic, это язык, который легко переводится с английского.
Line - линия
Input - ввод
For - для
To - до
Next - следующий
Даже не зная бейсика как такового, можно со словарем
перевести и понять о чем идет речь.
Учтите, что Free Basic и Visual Basic, это разные диалекты и алгоритмические
конструкции у них то же немного разные. Например, в Visual Basic 6.0
переменные объявляются так:
Dim s As String
Dim t As Integer, d As Single
Dim x (1 To 9) As Single ' массив из девяти элементов (1-9) для хранения значений с плавающей запятой.
А в Visual Basic .NET массивы начинаются только с нуля
Dim x (9) As Integer ' объявлен массив из 10 элементов (0-9) целого типа.
Похожие вопросы
- Помогите написать программу на Visual Basic (найти ошибку)
- Помогите кретину! Знаю только Visual Basic 6.0
- Помогите решить задачи в Visual Basic 6.0
- Помогите решить задачи в Visual Basic!!
- нужно дать коментарий к каждой строчке кода, программа в дельфи
- Ребят объясните каждую строчку кода Assembler, вроде лёгко, но я туплю...
- Продаю программу с исходниками на Visual Basic 2008 за 50 руб.
- Посоветуйте компилятор (не интерпретатор!) BASIC. Он должен создавать высокоэффективный код, в отличие от Visual Basic.
- Уважаемые программисты, помогите (MS Visual Basic 6.0)
- Помогите пожалуйста. Visual Basic - массивы
Выручил
А то скоро экзамен а как сдать ему это, вообще не вдуплял.