Maxxx Posted February 21, 2005 Report Share Posted February 21, 2005 (edited) Просьба не удолять тему. Мы еще не закончили. Сергей Плоткин: Встречная просьба - не флудить. В предыдущей теме было порядка 5-6 постов и ни одного по существу. Извени брат. Фигня вышла. Язык програмирования "Бейсик" Даю_одну_задачу.doc Даю_одну_задачу.doc Edited February 22, 2005 by Maxxx Quote Link to comment Share on other sites More sharing options...
Maxxx Posted February 26, 2005 Author Report Share Posted February 26, 2005 Ну как, тяжолая задача. Что то молчите? Вот пример решения. Может поможет. ЗАДАЧА 1. ПРОГРАММИРОВАНИЕ АЛГОРИТМОВ ЛИНЕЙНОЙ СТРУКТУРЫ 1.1 Основные сведения к выполнению работы Ввод данных возможен в двух режимах: из блока данных и с клавиатуры компьютера. При вводе данных из блока используются операторы READ и DATA. В операторе READ через запятую перечисляются переменные, которым будут заданы значения, в DATA - через запятую сами значения. Оператор DATA может располагаться в любом месте программы. При вводе с клавиатуры по оператору INPUT на экране дисплея появляется знак "?" и вычисления приостанавливаются до ввода требуемых значений. Для удобства при вводе следует пользоваться сообщениями, чтобы пользователь знал, какую информацию ожидает от него ЭВМ. 1.2. Пример решения простейшей задачи и оформления программы Пусть требуется вычислить координаты центра тяжести трех материальных точек с массами m1, m2, m3 и координатами (X1,Y1), (X2,Y2), (X3,Y3) по формулам: Xc = (m1 X1 + m2 X2 + m3 X3)/(m1 + m2 + m3) (1) Yc = (m1 Y1 + m2 Y2 + m3 Y3)/(m1 + m2 + m3) (2) Таблица используемых обозначений N п/п Наименование параметра Ед. изм. Обозначение в формулах Имя переменной 1 Масса 1-го тела кг m1 M1 2 Масса 2-го тела кг m2 M2 3 Масса 3-го тела кг m3 МЗ 4 Координаты 1-го тела м X1,Y1 X1,Y1 5 Координаты 2-го тела м X2,Y2 X2,Y2 6 Координаты 3-го тела м X3,Y3 X3,Y3 7 Координаты центра тяжести м Xс,Yс X,Y 8 Промежуточный параметр Z = m1 + m2 + m3 кг - Z Программа 10 INPUT "M1, M2, M3 =",M1,M2,M3 20 READ X1,Y1,X2,Y2,X3,Y3 30 Z=M1+M2+M3 40 X=(M1*X1+M2*X2+M3*X3)/Z 50 Y=(M1*Y1+M2*Y2+M3*Y3)/Z 60 PRINT "Координаты центра тяжести" 70 PRINT "X=”;X,”Y=",Y 80 DATA 1,2,5,7,12,15 90 STOP Quote Link to comment Share on other sites More sharing options...
Тролль Posted February 27, 2005 Report Share Posted February 27, 2005 Maxxx А что тут делать? Только в примере формулы изменить. Программа 10 INPUT "E, F =",E, F 20 READ C, D 30 A=11 40 B=5 50 N=(1.6*C+2.7*10^.7*F)/(.6*EXP(A)) 60 L=TAN(N/2)^2+(C^2+B^2+E^2)^(1/3) 70 M=N*L/(A+ABS(D))+12.4E3*COS(C/2) 80 PRINT "N=";N,"L=";L ,"M=",M 90 DATA 17,24 100 END P.S. А что у вас, препод бородой пол метет? Бейсик-то, судя по примеру, четвертьвековой давности. Quote Link to comment Share on other sites More sharing options...
Maxxx Posted February 27, 2005 Author Report Share Posted February 27, 2005 Он молодой но дурной. Считает что все должны знать програмирование без исключения. Даже если оно не нужно. Еще надо составить к этой задачи Блок-схему алгоритма. Quote Link to comment Share on other sites More sharing options...
Maxxx Posted March 10, 2005 Author Report Share Posted March 10, 2005 Ну как. Задача не посилам нашим програмистам Quote Link to comment Share on other sites More sharing options...
Тролль Posted March 10, 2005 Report Share Posted March 10, 2005 Maxxx Скорее всего нет. Это не относится к программированию. Это относится к древней истории программирования. Ты помнишь, как огонь трением добывать? Ну не пользуются этим программисты уже лет тридцать. И даже при желании не могут пользоваться. Программы пишутся по совершенно другим принципам. Я набросал эскиз блок-схемы, однако по оформлению лучше опять же посмотри примеры, которые давал ваш препод. Условные обозначения, особенно для ввода-вывода, могут отличаться от предпочитаемых им. Уже при появлении Бейсика были разные мнения, какие обозначения применять. Поскольку блок-схемы были значительно первобытнее, чем Бейсик. Bitmap.zip Bitmap.zip Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.