ПредишенСледващото

Оригиналният файл е колекция от записи на формата:
студент фамилия
неговата възраст
етаж
оценка на 4-OM Тестове
1.Opisat програма, която формира изходния файл
2.Opisat процедура, която показва името на файла от студенти, които имат среден клас точка над даден.

1. В програмата, която формира изходния файл

Текстът на програмата

Резултатът от програмата

1) Въведете името на файла:
file1.txt
фамилия 1 зеницата: Ivanov
Възраст: 18
Пол: м
оценка:
математика 3
физика 3
химия 3
литература 3
Продължи?
ш
фамилия 2 зеницата: Петров
Възраст: 17
Пол:
оценка:
математика 4
физика 4
химия 4
литература 4
Продължи?
ш
фамилия 3 зеницата: Сидоров
Възраст: 18
Пол: м
оценка:
математика 4
физика 4
химия 3
литература 4
Продължи?
ш
фамилия 4 зеницата: Vasiliev
Възраст: 17
Пол: м
оценка:
математика 5
физика 4
химия 5
литература 4
Продължи?
п
2)
Въведете името на файла:
file2.txt
фамилия 1 зеницата: Sergeev
Възраст: 18
Пол:
оценка:
математика 3
физика 3
химия 3
литература 3
Продължи?
ш
фамилия 2 зеницата: Nikolaev
Възраст: 18
Пол:
оценка:
математика 5
физика 5
химия 5
литература 4
Продължи?
фамилия 3 зеницата: Пугачов
Възраст: 18
Пол: м
оценка:
математика 5
физика 4
химия 5
литература 5
Продължи?
ш
фамилия 4 зеницата: Белов
Възраст: 17
Пол: м
оценка:
математика 4
физика 4
химия 4
литература 5
Продължи?
ш
фамилия 5 ученик: Смирнов
Възраст: 3
Пол: м
оценка:
математика 3
физика 4
химия 4
литература 3
Продължи?
п

2. програма, която съдържа процедура, която показва името на файла от студенти, които имат среден клас точка над дадена

Текстът на програмата

Резултатът от програмата

1)
Въведете името на ФАЙЛ_1:
file1.txt
Въведете ФАЙЛ_2 име:
температура
Въведете името на файла:
4
Посочете първия файл?
ш
фамилия Възраст Пол Математика Физика Химия литература
Ivanov 18 m 3 3 3 3
Петров, 17 х 4 4 4 4
Сидоров 18 No. 4 4 3 4
Василиев 17 5-4 5 4
Посочете второто изображение?
ш
Учениците с най-висока средната оценка 4000
фамилия Възраст Пол Математика Физика Химия литература
Петров, 17 х 4 4 4 4
Василиев 17 5-4 5 4
2)
Въведете името на ФАЙЛ_1:
file2.txt
Въведете ФАЙЛ_2 име:
t.txt
Въведете Средната оценка:
4
Посочете първия файл?
ш
фамилия Възраст Пол Математика Физика Химия литература
Sergeev 18 х 3 3 3 3
Николаев 18 F Двойка 5 5 5 4
Пугачов 18 m 5 5 5 5
Белов 17 No. 4 4 4 5
Smirnov m 3 3 4 4 3
Посочете второто изображение?
ш
Учениците с най-висока средната оценка 4000
фамилия Възраст Пол Математика Физика Химия литература
Николаев 18 F Двойка 5 5 5 4
Пугачов 18 m 5 5 5 5
Белов 17 No. 4 4 4 5
3)
Въведете името на ФАЙЛ_1:
file2.txt
Въведете ФАЙЛ_2 име:
е
Въведете Средната оценка:
5
Посочете първия файл?
п
Посочете второто изображение?
ш
Учениците с най-висок Средната оценка от 5000
фамилия Възраст Пол Математика Физика Химия литература
Пугачов 18 m 5 5 5 5

Теорията на програмата

TWaveHeader = запис Marker1: Array [0..3] овъгляване; BytesFollowing: LongInt; Marker2: Array [0..3] овъгляване; Marker3: Array [0..3] овъгляване; Fixed1: Nbsp.

В TMediaPlayer може да отвори файл, ако той съдържа най-малко един байт данни. Открих това, когато използвате този компонент се опитва да създаде и да отвори аудио файл, съдържащ само заглавието на аудио файла. В TMediaplayer не исках да го направя. По-долу, за да.

Този документ е създаден след многобройните искания на потребителите и описва допълнителна функционалност Delphi TMediaPlayer компонент. Нова функционалност компонент е възможността да се създават, когато пишете нова .wav формат. Процедура "SaveMedia" създава един вид повторно.

По подразбиране INI-файл е създаден в Windows-директория (например: TIniFile.Create ( "MFile.ini")), което води до "боклуците" от него. Още (еко) логическа (с изключение на случаите, когато програмата се извършва за CD-ROM), ако INI-файл се създава в същата директория като основна програма.

Var MyIcon: TIcon; започнем MyIcon: = TIcon. Създаване; опитайте MyIcon.Handle: = ExtractIcon (hInstance "MYPROG.EXE ', 0) най-накрая MyIcon.Free; приключи; приключи; Имайте предвид, че средната стойност трябва да бъде от тип PChar.

Свързани статии

Подкрепете проекта - споделете линка, благодаря!