В общем нужна очень срочная помощь по программированию.
Задание такое дали.
Язык - Бейсик. Через самую тупую программу, Geany выполнить пару заданий. Я вот никак не могу настроить эту херню.
Задание такое : Написать программу, определяющую среднее арифметическое всех чисел от 0 до заданного пользователем.
Ну я написал, получилось так :
#lang "fb"
Dim As Integer b,i,e=0
Dim As String Srednee
print "Введите число"
For i = 0 to b
e=e+1
Next i
Srednee=e/b
print Srednee
Сделав, компилирую и пытаюсь выполнить, не выполняется. Пишет следующее : "Не является внутренней или внешней командой, исполняемой программой или пакетным файлом."
За полезные советы спасибки набью
Дите опять обосралось. Я в причине бана четко написал: "Твои темы не должны засорять ленту"
Если хочешь получить внимания-делай все это в одной теме или создавай на пару с сохой в его разделе, вы с ним подружитесь.
И да кстати, после услышанного в скайпе я с чистой душой могу тебя перманентно забанить
Цитата:
Сообщение от Gish12
Забаньте модера за то что он правил не знает. Где написано что мои темы не дожны высвечиваться в ленте? покажи ?отберите модерку за незнание правил
Кстате там где интегер не нужны ; после каждой строки?
Цитата:
Сообщение от budlight
Дите опять обосралось. Я в причине бана четко написал: "Твои темы не должны засорять ленту"
Если хочешь получить внимания-делай все это в одной теме или создавай на пару с сохой в его разделе, вы с ним подружитесь.
И да кстати, после услышанного в скайпе я с чистой душой могу тебя перманентно забанить
Цитата:
Сообщение от Gish12
Забаньте модера за то что он правил не знает. Где написано что мои темы не дожны высвечиваться в ленте? покажи ?отберите модерку за незнание правил
Ты не из Китая случаем ? Google не заблокирован ?
1 запрос..
не 1 нажатия кнопки...
Если сложно перейти
Код:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a() As Single, n As Integer, Sum As Single, answer
Sum = 0
Dim lower As Single, upper As Single
n = InputBox("Количество элементов в массиве")
lower = InputBox("Нижняя граница диапазона генерации")
upper = InputBox("Верхняя граница диапазона генерации")
n = n - 1
ReDim Preserve a(0 To n)
answer = ""
For i = 0 To n
a(i) = Int((upper - lower) * Rnd() + lower)
answer = answer & a(i) & Space(4)
Sum = Sum + a(i)
Next
Sum = Sum / n
MsgBox(answer & Chr(13) & Sum)
End Sub
+
Условие не верное..
Код:
For i = 0 to b
e=e+1
Next i
Srednee=e/b
заполниться E , и выйдет число, сколько цифр, и потом ты делишь его на само себя (B количество цифр) Что за бред ?
Универ ? Выучи хоть основу математики..
Учитель мудевень) Basic не айс..
Последний раз редактировалось Lenivets; 27.12.2012 в 18:50.
Во что превратился RFCheats..
Я чувствую себя дедом..я не понимаю как можно жрать все то что сейчас кричат в ММО индустрии ???
Дите опять обосралось. Я в причине бана четко написал: "Твои темы не должны засорять ленту"
Если хочешь получить внимания-делай все это в одной теме или создавай на пару с сохой в его разделе, вы с ним подружитесь.
И да кстати, после услышанного в скайпе я с чистой душой могу тебя перманентно забанить
Цитата:
Сообщение от Gish12
Забаньте модера за то что он правил не знает. Где написано что мои темы не дожны высвечиваться в ленте? покажи ?отберите модерку за незнание правил