Информатика. Курс лекций. Громов Ю.Ю - 171 стр.

UptoLike

ВУЗ: 

ТГТУ | Тамбов

Составители: 

Рубрика: 

}
void printnames()
{ int i;
cout « endl;
for(i = 0; i < ListLength; ++i)
cout « names[i] « endl;
}
}
// Создание объекта с именем namelist и обращение к нему с
// требованием ввести несколько имен, отсортировать их, а
// затем вывести отсортированный список на экран.
void main()
{ list namelist;
namelist.getnames();
namelist.sortlist();
namelist.printnames();
}
Рис. Г.3. Пример программы на языке С++
процедур такие же, как и в программе на языке С, представленной на рис. Г.2. Отличие заключается в том, что в программе
на языке C++ эти операции рассматриваются как часть свойств объекта, в то время как в программе на языке С они считают-
ся отдельными модулями той части программы, где эти процедуры описываются.
Язык FORTRAN. FORTRAN (сокращение от FORmula TRANslator – транслятор формул) был одним из первых языков
программирования высокого уровня (впервые опубликован в 1957 г.) и первым языком, получившим широкое признание в
компьютерном сообществе. Со временем его официальное описание претерпело многочисленные изменения, так что теперь
можно встретить ссылки на языки FORTRAN IV и FORTRAN 77. Последним в этом ряду стоит FORTRAN 90, который является
дальнейшим развитием языка FORTRAN 77 и обладает такими свойствами, как рекурсия и определяемые пользователем типы
данных.
Несмотря на то, что язык FORTRAN критикуется многими авторами, он остается популярным в научном мире. В част-
ности, многие пакеты программ по численному анализу и статистике написаны и, вероятно, до сих пор пишутся на языке
FORTRAN. Пример программы на этом языке представлен на рис. Г.4.
! Программа обработки списка
INTEGER J,K
CHARACTER(LEN=8) Pivot
CHARACTER(LEN=8) DIMENSION(10) Names
! Сначала получаем имена
READ(UNIT=5, FMT=100) (Names(K), K=l,10)
100 FORMAT(A8)
! Теперь сортируем список
OuterLoop: DO J=2,10
Pivot = Names(J)
InnerLoop: DO K=J-1,1,-1
IF (Names(K) .GT. Pivot)
THEN Names(K+l) = Names(K)
ELSE InnerLoop
ENDIF
END DO InnerLoop
Names (K+l) = Pivot
END DO OuterLoop
! Теперь выводим отсортированный список на экран
WRITE(UNIT=6,FMT=400) (Names(K), K=l,10)
400 FORMAT('',A8)
END
Рис. Г.4. Пример программы на языке FORTRAN
// Программа обработки списка
import java.io.*
// Все объекты класса list содержат список имен и три открытых
// метода, которые называются getnames, sortlist и printnames.
class list
{ final int ListLength = 10;
private String[] names;
public list()

Страницы