Программирование на языке Java и Pascal

Автор работы: Пользователь скрыл имя, 20 Декабря 2011 в 11:21, курсовая работа

Краткое описание

Основной целью курсовой является решение выданных заданий и подробное описание решений.

Для реализации цели необходимо выполнить следующие задачи:
Показать умение работать с операторами циклов, строками, матрицами и, как частный случай, массивами. Результат – небольшие программы написанные на Java и Pascal
Создать файл соответствующей предметной области
Реализовать задачу II на Java с графическим интерфейсом и максимальным использованием всех компонентов пакета Swing

Содержание работы

Введение 4
Глава 1. Алгоритмизация - работа с массивами на Pascal и Java 5
Массивы в Pascal 5
Решение задач на работу с массивами на алгоритмическом
языке Pascal 6
1.2 Массивы в Java 17
Решение задач на работу с массивами на алгоритмическом
языке Java 19
На Turbo Pascal 28
Глава 3. Разработка графического интерфейса на Java 60
Заключение 67
Литература 68
Приложение А 69
Приложение Б 70
Приложение В 71
Приложение Г 73
Приложение Д 74
Приложение Е 75
Приложение Ж 76
Приложение З 77
Приложение И 78
Приложение К 80
Приложение Л 81
Приложение М 82
Приложение Н 83
Приложение О 87
Приложение П 91
Пояснительная записка 104

Содержимое работы - 1 файл

Курсовая работа.doc

— 1.81 Мб (Скачать файл)

            for (int i=0;i<n;i++)

                  for (int j=i+1;j<n;j++)

                        if (x[j]>x[i]){

                              int c=x[j];

                              x[j]=x[i];

                              x[i]=c;

                        }

      }

      public static void uporyadochPoVozr(int x[]){ //метод по возрастанию

            for (int i=0;i<n;i++)

                  for (int j=i+1;j<n;j++)

                        if (x[j]<x[i]){

                              int c=x[j];

                              x[j]=x[i];

                              x[i]=c;

                        

      }

      public static void vvod(int x[]){ //метод заполнении массива

            for (int i=0;i<n;i++)

                  x[i]=(int)Math.round(Math.random()*10);

      }

      public static void main(String args[]){ //главный метод 

            int i,j=0;

            int a[]=new int[n];

            int b[]=new int[n];

            int c[]=new int [a.length+b.length]; 

            System.out.println("Исходные массивы:");

            vvod(a);//выводим массив

            uporyadochPoUbiv(a); //упорядочиваем его

            for(i=0; i<a.length; i++)

                  System.out.print(a[i]+ " ");

            System.out.println();

            vvod(b);

            uporyadochPoVozr(b);

            for(i=0; i<b.length; i++)

                  System.out.print(b[i]+ " ");

            System.out.println();

            System.out.println("Массив, составленный из данных, упорядоч-й по убыванию:");

            for(i=0; i<b.length; i++) //сливаем все массивы в один

                  c[i]=a[i]; 

            for(i=a.length; i<c.length; i++){

                  c[i]=b[j];

                  j++;

            

            for(i=0; i<c.length; i++) //сортируем по убыванию

                  for(j=i+1; j<c.length; j++)

                        if (c[i]<c[j]){

                            int f = c[i];

                            c[i]=c[j];

                            c[j]=f;

                        } 

            for(i=0; i<c.length; i++) //выводим на экран

                  System.out.print(c[i]+" ");

      }

}

 

Приложение  К

 

public class lab_4{

      public static int n=2;

      public static void vvod(int x[][]){ //метод ввода массива

            for (int i=0;i<n;i++)

                  for (int j=0;j<n;j++)

                  x[i][j]=(int)Math.round(Math.random()*10);

      }

      public static void vivod(int x[][]){ //метод вывода массива

            for (int i=0;i<n;i++){

                  for (int j=0;j<n;j++)

                  System.out.print(x[i][j]+" ");

                  System.out.println();

            }

      }

//метод перемножения  массивов

      public static void proizvedenie(int x[][],int y[][],int z[][]){

            for (int i=0;i<n;i++)

                  for (int j=0;j<n;j++)

                        for (int k=0;k<n;k++)

                              z[i][j]=z[i][j]+x[i][k]*y[k][j]; 

      }

      public static void main(String args []){ //главный метод 

            int a[][]=new int [n][n];

            int b[][]=new int [n][n];

            int c[][]=new int [n][n]; 

            vvod(a);

            vvod(b);

            System.out.println("Массив А");

            vivod(a);

            System.out.println("Массив B");

            vivod(b);

            System.out.println("Массив C - произведение матриц А и В");

            proizvedenie(a,b,c);

            vivod(c);

      }

}

 

Приложение  Л

 

public class lab_5{

      public static void main(String args []){

            int n=5,i,j,c;

            int u[]=new int [n];

            u[0]=1;u[1]=0;u[2]=2;u[3]=0;u[4]=2;

            System.out.println("Числа  Фибоначчи");

            for (i=0;i<u.length;i++) //выводим массив

                  System.out.print(u[i]+" ");

            for (i=0;i<u.length;i++)

                  for (j=i+1;j<u.length;j++) //сортируем по возрастанию

                        if (u[j]<u[i]){

                              c=u[i];

                              u[i]=u[j];

                              u[j]=c;

                        }

            System.out.println("\n Измененный!");

            for (i=0;i<u.length;i++)

                  System.out.print(u[i]+" "); 

      }

} 
 
 

 

Приложение М

 

public class lab_6{

      public static int factorial(int m){ //метод перемножения s и j

            int s=1;

            for(int j=1;j<=m;j++)

                  s*=j;

            return s;

      }

      public static void main(String args[]){ //главный метод

            int n=7,i;

            float a[]=new float [n];

            for(i=1; i<a.length; i++){ //в массиве производим действия

                  a[i]=(float)1/factorial(i);

            }

            System.out.println("Массив, заполненный с помощью метода:");

            for(i=1; i<a.length; i++){

                  System.out.print(a[i]+" ");

            }

            System.out.println();

            System.out.println("Массив, заполненный ,без помощи метода:"); 

            int s=1;

            for(i=1; i<a.length; i++){

                  s*=i;

                  a[i]=(float)1/(s);

            }

            for(i=1; i<a.length; i++){

                  System.out.print(a[i]+" ");

            }

}

} 

 

Приложение  Н

 

program Chast_2;

type Data_1 = record //создание записи содержащей 4 поля

     Nazv: string;

     art: integer;

     kolvo: integer;

     prize: integer;

end;

var // необходимые переменные

  Fna: string;

  s: string;

  Fname1: string;

  nam: string;

  input_2: string;

  newS: string;

  menu: integer;

  w: integer;

  bool: boolean;

  OK: boolean;

  Data: array[0..100] of Data_1;

 

// процедура, которая  читает строку пословно 

function Word(var s: string): string; var

  i: integer; 

begin

  Result := copy (s,1,pos(' ',s)-1);

  delete(s,1,pos(' ',s));

  Word := result;

end;

// процедура загрузки  файла

procedure Load(name: string);

var

  f: text;

  j: integer;

  code: integer;

begin

  Assign(f, name); // связка физического файла с текстовой переменной

  Reset(f); //подготовка файла к чтению

  j := 0;

  while not (eof (f)) do //цикл будет выполняться, пока не достигнет конца //файла

  begin

    readln(f, s); //в переменную s считывается строка текстового файла

    S := s + ' ';

    Data[j].Nazv := word(s);

//заполняются поля  записи с помощью функции word

    Val(word(s), Data[j].art, code);

    Val(word(s), Data[j].kolvo, code);

    Val(word(s), Data[j].prize, code);

    inc(j);

    end;

  w := j; // в w содержится длина массивов и кол-во строк в файле

//закрываем файл

  close(f);

end; 

//процедура изменения  свойств товара

procedure Edit(name: string);

var

  tas: string;

  i: integer;

  f: text;

begin

  readln(tas); //в переменную вводим название товара, свойства которого нужно изменить

  for i := 0 to W-1 do

  begin

    if Data[i].Nazv = tas then //находим нужный товар

    begin

//изменяем свойства

      Writeln('Введите новый артикул товара');

      readln(Data[i].art);

      Writeln('Введите новое количество');

      readln(Data[i].kolvo);

      Writeln('Введите новую цену');

      readln(Data[i].prize);

    end;

  end;

Assign(f, name);

rewrite(f);

for i := 0 to W-1 do // переписываем файл с новой информацией

  writeln(f, Data[i].Nazv,' ', Data[i].art,' ', Data[i].kolvo,' ', Data[i].prize);

  close(f); //закрываем файл

end;

//процедура записи  в файл

procedure Zapis(var name: string; fas: string);

var

  f: text;

  i: integer;

begin

  Assign(f, name);

  rewrite(f);

  for i := 0 to W-1 do // переписываем старый файл новой информацией

    writeln(f, Data[i].Nazv,' ', Data[i].art,' ', Data[i].kolvo,' ', Data[i].prize);

//дописываем в  конец строку с информацией  о новом товаре

  writeln(f , fas);

  close(f);

end;

//процедура печати  массивов

procedure print;

var

  i: integer;

begin

  for i := 0 to W-1 do

   writeln(Data[i].Nazv,' ', Data[i].art,' ', Data[i].kolvo,' ', Data[i].prize);

end;     

//процедура поиска  товара по названию товара

Информация о работе Программирование на языке Java и Pascal