Первая часть текста (разд. 2–7) содержит необходимые теоретические сведения и задания на 6 лабораторных проектов по основным те- мам линейной алгебры. Во второй части (разд. 8–9) приведены задачи, контрольные задания и рабочая программа курса. Для студентов, изучающих численные методы по программе под- готовки в области математики, экономики и управления, естественных или технических наук по специальностям: 010101 – Z Математика , 010501 – Прикладная математика и информатика P, 010503 – b Математическое обеспечение и администрирование информационных систем, 210400 – Телекоммуникации0, 230200 – B Информационные системы, 230301 – Моделирование и исследование операций в организационно- технических системах&, 080801 – 8Прикладная информатика (по областям) , 090105 – Комплексное обеспечение информационной безопасности автоматизированных систем: и другим
Дан текстовый файл с изображениями целых чисел. В выходной файл поместить обратные величины двухзначных чисел. Пример: для 26 – 0.038, для 87 – 0.011, и т.д. На экран вывести количество чисел во входном файле, количество чисел в выходном файле, размер входного и выходного файла в байтах.
ОПРЕДЕЛЕНИЕ УСКОРЕНИЯ СВОБОДНОГО ПАДЕНИЯ С ПОМОЩЬЮ МАТЕМАТИЧЕСКОГО МАЯТНИКА 1. Цель работы: экспериментальное определение ускорения свободного падения при помощи математического маятника 2. Перечень приборов и принадлежностей: лабораторная установка «Математический маятник», секундомер. 3. Материал для изучения:раздел «Гармонические колебания».
AnyLogic - программное обеспечение для имитационного моделирования сложных систем и процессов, разработанное российской компанией «Экс Джей Текнолоджис» ( XJ Technologies). Программа обладает графической средой пользователя и использует язык Java для разработки моделей.
Внимание! Если ссылка не работает, файл не найден или просто возникают какие-либо вопросы, напишите об этом, пожалуйста, мне на почту: xdypx@yandex.ru. В письме достаточно указать ссылку на эту страницу и описание проблемы или свой вопрос.
Описание: Задание: На
экране построить семейство кривых, заданных функцией:
Y = 4.6·G·sin(x/F) + 1.9·M·cos(x+1.8);[-4 < x <4] Группа
параметров G,M,F вводится с клавиатуры.
Исходный код: Program Lab10F; uses Graph,crt; type mystring=string[32]; var i:byte; rez:word; x,y:integer; mk,G,F,M:real;
procedure Grafik(G,F,M:real);
var grDriver: Integer; grMode: Integer; ErrCode: Integer; x,y,minx,miny,maxx,maxy,q:real; nx,ny,nmaxx,nmaxy,ram:integer; s:string; begin grDriver := Detect; InitGraph(grDriver, grMode,'c:\lang\TP71\bgi'); {cyuda vvesti svoy put'} ErrCode := GraphResult; if ErrCode = grOk then begin { Do graphics } {[-4 < x <4]} minx:=-4; maxx:=4; ram:=1; nmaxx:=getmaxx-2*ram; nmaxy:=getmaxy-2*ram; q:=0.001; x:=minx; maxy:=4.6*G*sin(x/F)+1.9*M*cos(x+1.8); {cyuda vvesti svoyu funkciyu} miny:=maxy; while x<=maxx do begin y:=4.6*G*sin(x/F)+1.9*M*cos(x+1.8); {cyuda vvesti svoyu funkciyu} if y>maxy then maxy:=y; if y<miny then miny:=y; x:=x+q; end; q:=0.001; {kol-vo to4ek} x:=minx; while x<=maxx do begin y:=4.6*G*sin(x/F)+1.9*M*cos(x+1.8); {cyuda vvesti svoyu funkciyu} nx:=round((nmaxx*(x-minx)/(maxx-minx))+ram); ny:=round((nmaxy*(maxy-y)/(maxy-miny))+ram); putpixel(nx,ny,2); x:=x+q; end; y:=0; ny:=round((nmaxy*(maxy-y)/(maxy-miny))+ram); setcolor(14); line(ram,ny,nmaxx+ram,ny); q:=1; x:=minx; while x<=maxx do begin nx:=round((nmaxx*(x-minx)/(maxx-minx))+ram); line(nx,ny-4,nx,ny+4); str(x:2:0,s); outtextxy(nx,ny-8,s); x:=x+q; end; x:=0; nx:=round((nmaxx*(x-minx)/(maxx-minx))+ram); setcolor(14); line(nx,ram,nx,nmaxy+ram); q:=(maxy-miny)/10; y:=miny; while y<=maxy do begin ny:=round((nmaxy*(maxy-y)/(maxy-miny))+ram); line(nx-4,ny,nx+4,ny); str(y:6:2,s); outtextxy(nx,ny,s); y:=y+q; end; {line(30,30,610,30); line(610,30,610,450); line(30,30,30,450); line(30,450,610,450);}
Readln; CloseGraph; end else Writeln('Graphics error:', GraphErrorMsg(ErrCode)); end;