Главная Вход в систему Регистрация
Задать вопрос Консультации Пользователи Форум
О системе Помощь
Задать вопрос экспертам
Консультация № 184230
16.10.2011, 22:00
0.00 руб.
0 9 1
Компьютеры Программирование
Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
еще раз здравствуйте, просто умоляю слезно на коленях. хоть кто нибудь объясните мне от а до я - как написать на гребаном бейсике программу в блокноте чтобы она считала пример "2+2=4" исходные данные чтобы вводились тоже через блокнот и выводились желательно бы тоже в блокноте. пожалуйста расскажите мне дибилоиду, я нихрена вдуплить не могу как это писаться должно .
заранее спасибо. если можно, то ответ на почту пришлите tolstyi_max2007@mail.ru

Обсуждение

давно
PsySex
Профессионал
848
1596
17.10.2011, 08:44
общий
Перепишите задание слово-в-слово, которое дал Вам преподаватель, а то я тоже
нихрена вдуплить не могу как это писаться должно

Неизвестный
17.10.2011, 12:59
общий
написать программу на бейсике в блокноте которая должна считать пример x+y=4, где x и y должны задаваться по запросу программы. и результат должен выводиться в отдельный файл
давно
PsySex
Профессионал
848
1596
17.10.2011, 13:24
общий
это ответ
Здравствуйте, Посетитель - 383246!
Открываете блокнот, вносите текст
Код:
dim x,y,z
x=inputbox("Введите Х")
y=inputbox("Введите Y")
z=cLng(x)+cLng(y)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set myfile = objFSO.CreateTextFile("result.txt", True)
myfile.WriteLine (x & "+" & y & "=" & z)
myfile.Close
msgbox x & "+" & y & "=" & z & vbcrlf & "Резултат сохранен в result.txt"

Сохраняете файл, меняете расширение файла на .vbs и запускаете двойным кликом. Программа складывает целые числа.
давно
Вадим Исаев ака sir Henry
Мастер-Эксперт
425
4118
17.10.2011, 14:00
общий
Цитата: 383246
...и выводились желательно бы тоже в блокноте...

Цитата: 383246
...результат должен выводиться в отдельный файл

Это ведь две совершенно разные вещи, так же как MP3-проигрыватель и MP3-файл, который Вы слушаете. Вы и запутались из-за то, что перемешали в одну кучу то и другое. Файл - это хранилище текста, а блокнот - это показыватель текста. Не путайтесь больше.
Об авторе:
Я только в одном глубоко убеждён - не надо иметь убеждений! :)
Неизвестный
17.10.2011, 14:08
общий
PsySex, спасибище огромное!!!! просто респектище тебе)))
давно
PsySex
Профессионал
848
1596
17.10.2011, 16:56
общий
17.10.2011, 16:56
Обратите внимание внимание, что я изменил строчку кода
Код:
z=cInt(x)+cInt(y)

на
Код:
z=cLng(x)+cLng(y)

Иначе вводимые числа ограничивались 32767, из за того что числа приводились к типу данных Integer. Теперь будет Long
Неизвестный
17.10.2011, 21:07
общий
пользуясь случаем. подскажите пожалуйста книжку с автором в которой можно подробно почитать про этот язык и таки научиться писать на нем программы???
Неизвестный
18.10.2011, 05:09
общий
dim myfile
myfile=freefile
open("D:\2+2.txt")For Input As #myfile



почему не работает???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
давно
PsySex
Профессионал
848
1596
18.10.2011, 08:15
общий
18.10.2011, 09:42
Книжку наверно не посоветую, спросите у гугла например
VBS книга
Вы должны понять, то что можно написать в блокноте это Visual Basic Script, то что написали Вы
open("D:\2+2.txt")For Input As #myfile

Это скорее относится к Visual Basic. Visual Basic намного функциональнее чем Visual Basic Script, но чтобы писать на Visual Basic просто в блокноте нельзя набрать программу, нужна сама среда разработки.
Форма ответа