Составить укрупненный алгоритм и программу на языке высокого уровня для решения задачи по своему варианту. Язык программирования и вариант исходных данных выбрать по последней цифре номера зачетной книжки.
В текстовом файле имеются данные для N воздушных целей, опреде-ленных станцией слежения в момент времени T0
альфа i, V гор i ,V вер i , фи i ,H i ,L i
… и т.д. (число целей заранее не известно)
Параметры движения постоянны. Составить программу для расчета траектории движения целей и определения величин, указанных в таблице для своего варианта.
Программа должна визуализировать начальное положение целей и траекторию их движения, а также основные показатели целей, включая расчетные значения по своему варианту.
Номер цели, которая пройдет на минимальном расстоянии по прямой дальности от станции слежения.
29 января 2008 в 15:03
я могу накидать вам примеры моделирования, это просто, особенно траекторий
19 января 2008 в 16:04
Моделирование. Ну, нарисовать, полагаю, сможете. Формулы есть? Давайте с начала.
Чтение файла на паскале:
var textfile : text;
___strings : array[1..1000] of string[30];
___i : integer;
begin
__Assign(textfile,'FileOfData.txt');
__Reset(textfile);
__i := 1;
__while not Eof(TextFile) do begin readln(textfile,strings[i]); inc(i); end;
end.
Вот таким образом файл читаем. Это, конечно, самый простой способ. Дальше развивайте мысль…
Я бы еще объект описал например так:
Type
__target = object
____vx,vy,fi ,HOfi,LOfi…: real;
____constructor create(var textfile: text;varindex : integer); {бум грузить сразу в объект}
____function flytointimedo(…):boolean;
____procedure printcoord(…);
____…
__end;
Ну и так далее…
И вся прога в итоге выльется в нечто типа:
var targets : array[1..1000] of ^target;
___tf : text;
___i : integer;
begin
__Assign(tf,'file.txt');
__i := 1;
__while Not Eof(tf) do new(targets[i],create(fl,i));
__for i:=1 to i do targets[i]^.printcoord();
end;
19 января 2008 в 15:04
В чем затруднения?