1. Ввод данных Данные могут вводиться с клавиатуры и из файла, который может быть на жестком диске и на внешнем запоминающем устройстве.
При вводе данных с клавиатуры необходимо создать файл с начальными значениями. При этом самостоятельно выбрать директорию, где записать данный файл. Если необходимо, то создать новую директорию.
При вводе данных с диска нужно самостоятельно выбрать директорию, где находится данный файл.
2.Вывод результатов
Результаты должны быть представлены в виде: а) графика, б) числовых значений. Они также должны быть записаны в виде файла. При этом самостоятельно выбрать директорию, где должен храниться данный файл.
Для данной программы обеспечить вывод графики в виде изменения функции y=f(x) с осями Х и Y. График помещается в отдельном окне.
3. Обеспечить диспетчеризацию решения задачи
Это управление всем процессом решения задачи.
Предусмотреть вывод информации.
4. Защита данных и справочная информация
Защита данных обеспечивается вводом пароля.
Справочная информация включает некоторые сведения о программе и об авторе разработки. В данную программу можно поместить свою фотографии, фамилию, имя и отчество. Можно указать год разработки.
5. Показатели качества созданного программного обеспечения.
Определить быстродействие и затраты памяти в зависимости от степени загрузки
//Pascal //Массивы размеров 10 элементов заполняются случайными числами от -10 до 10
//1 var A: array[1..10] of real; i: byte; begin randomize; writeln('Исходный массив.'); for i := 1 to 10 do begin A[i] := random(21)-10; write(A[i]:5); end; writeln; writeln('Измененный массив.'); for i := 1 to 10 do begin if A[i] > 0 then A[i] := A[i] / 2 else A[i] := i; write(A[i]:5); end; writeln; end.
//2 var A: array[1..10] of integer; i: byte; mult: longint; begin mult := 1; randomize; writeln('Исходный массив.'); for i := 1 to 10 do begin A[i] := random(21)-10; mult := mult * A[i]; write(A[i]:5); end; writeln; writeln('Произведение элементов массива = ', mult); end.
1) uses crt; const size = 10; var a:array [1..size] of integer; i,p:longint; begin p:=1; randomize; for i:=1 to size do begin a[i]:=random(20); write (a[i],' '); if (a[i] mod 3 = 0) then p:=p*a[i]; end; writeln; writeln (p); end.
2) uses crt; const size = 10; var a:array [1..size] of integer; i:integer; s:real; begin s:=0; randomize; for i:=1 to size do begin a[i]:=random(4)+1; write (a[i],' '); s:=s+a[i]; end; writeln; s:=s/size; writeln (s); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
