СтудСфера.Ру - помогаем студентам в учёбе

У нас можно недорого заказать курсовую, контрольную, реферат или диплом

Решения задач на Pascal  Файловый тип данных - Контрольная работа №24214

«Решения задач на Pascal Файловый тип данных» - Контрольная работа

  • 15 страниц(ы)

Содержание

Введение

Выдержка из текста работы

Заключение

Список литературы

Примечания

фото автора

Автор: navip

Содержание

5.6. Лабораторная работа 5

Тема: Файловый тип данных.

Вариант Задания

2 1. Заполнить файл последовательного доступа N действительными числами, полученными с помощью датчика случайных чисел. Найти сумму максимального и минимального элементов этого файла.

2. Дан файл bibl, содержащий сведения о книгах. Сведения о каждой из книг – это фамилия автора, название и год издания. Определить, имеется ли книга с названием «Информатика». Если да, то напечатать фамилию автора и год издания. Если таких книг несколько, то напечатать все имеющиеся о них сведения.

3 1. Записать файл f последовательного доступа N натуральных чисел. Получить в другом файле последовательного доступа все компоненты файла f, кроме тех, которые кратны K. Вывести полученный файл на печать.

2. Дан файл T, который содержит номера телефонов сотрудников учреждения: указываются фамилия, инициалы и номер телефона. Найти фамилию и инициалы сотрудника по его номеру телефона.

4 1. Заполнить файл f целыми числами, полученными с помощью генератора случайных чисел. Найти количество удвоенных нечётных чисел среди компонентов файла.

2. Багаж пассажира характеризуется количеством вещей и их общим весом. Дан файл bagazh, содержащий сведения о багаже нескольких пассажиров. Сведения о багаже каждого пассажира представляют собой запись с двумя полями: одно поле целого типа (количество вещей) и одно действительного (вес в килограммах). Выяснить, имеется ли пассажир, багаж которого состоитиз одной вещи весом менее М кг.

6 1. Записать в файл прямого доступа N действительных чисел. Найти наибольшее из значений модулей компонентов с нечётными номерами.

2. Дан файл tovar, содержащий сведения об экспортируемых товарах: указываются наименование товара, страна, импортирующая товар, и объем поставляемой партии в штуках. Составить список стран, в которые экспортируется данный товар, и указать общий объем его экспорта.

8 1. Записать в файл последовательного доступа N действительных чисел. Найти разность первого и последнего компонентов файла.

2. Дан файл, содержащий различные даты. Каждая дата – это число, месяц и год. Есть ли среди них дата вашего рождения?

9 1. Записать в файл f N целых чисел, полученных с помощью

генератора случайных чисел. Заполнить файл g целыми числами, которые являются произведениями соседних компонентов файла f.

2. Дан файл assort, содержащий сведения об игрушках: указывается название игрушки, ее стоимость в рублях и возрастные границы ( например, игрушка может предназначаться для детей от 2 до 5 лет). Получить название 3-х самых дорогих игрушек. Есть ли среди них те, которые подходят для семилетнего ребенка?

11 1. Дан файл bibl, содержащий сведения о книгах. Сведения о каждой из книг – это фамилия автора, название и год издания.

Найти названия книг данного автора, изданных начиная с 1960 г.

2. Записать в файл последовательного доступа N действительных чисел. Найти разность наибольшего из этих чисел со средним арифметическим всех положительных чисел файла.

12 1. Дан файл T, который содержит номера телефонов сотрудников учреждения: указываются фамилия, инициалы и номер телефона. Найти номер телефона сотрудника по его фамилии и инициалам

2. Записать в файл последовательного доступа N действительных чисел. Найти среднее геометрическое компонентов файла.

13 1. Дан файл, содержащий различные даты. Каждая дата – это число, месяц и год. Найти год с наименьшим номером.

Введение

var

f:text;

i1,j1,n,i,j:integer;

m,k:array[1.100] of real;

l:real;

a1,b,a:string;

begin

readln(n);

assign(f,'a:\prz\output.txt');

rewrite(f);

randomize;

for i:=1 to n do writeln(f,random(10));

close(f);

assign(f,'a:\prz\output.txt');

reset(f);l:=1;

for i:=1 to n do

begin

readln(f,k[i]);

writeln(k[i]);

l:=l*k[i];

if i<>1 then l:=sqrt(l)

end;

close(f);

writeln('Otvet:',l);

readln;

end.

Выдержка из текста работы

var

f:text;

s1,s2,N,max,min,q,i:integer;

begin

randomize;

write('N=');readln(n);

assign(f,'input.txt');

rewrite(f);

for i:=1 to n do

begin

writeln(f,random(n));

end;

close(f);

max:=0;

min:=32000;

assign(f,'input.txt');

reset(f);

for i:=1 to n do

begin

readln(f,q);

write(q:4);

if q>max then max:=q;

if qend;

close(f);

assign(f,'input.txt');

reset(f);

for i:=1 to n do

begin

readln(f,q);

if q=max then s1:=s1+q;

if q=min then s2:=s2+q;

end;

close(f);

writeln;

writeln('Max=',max);

writeln('Cг  max=',s1);

writeln('Min=',min);

writeln('Cг  min=',s2);

readln;

end.

Заключение

Const

Source = 'input.txt';

Target = 'output.txt';

Qmax = 100;

Type

Date = Record

Day, Month, Year: Integer;

end;

Var

D: Array[1.Qmax] of Date;

I, N, MinYear: Integer;

R: Date;

Begin

Assign(Input, Source);

Reset(Input);

Assign(Output, Target);

Rewrite(Output);

N := 0;

While Not EOF Do

Begin

Inc(N);

ReadLn(D[N].Day, D[N].Month, D[N].Year);

End;

If N = 0 Then Exit;

MinYear := D[1].Year;

For I := 1 To N Do

If D[I].Year < MinYear Then MinYear := D[I].Year;

WriteLn('Мин. Год: ', MinYear);

WriteLn('Весенние даты:');

For I := 1 To N Do

If (D[I].Month >= 3) And (D[I].Month <= 5) Then WriteLn(D[I].Day, ' ', D[I].Month, ' ', D[I].Year);

R := D[1];

For I := 1 To N Do

Begin

If D[I].Year > R.Year Then R := D[I];

If D[I].Year = R.Year Then

Begin

If D[I].Month > R.Month Then R := D[I];

If D[I]. Month = R.Month Then

If D[I].Day > R.Day Then R := D[I];

End;

End;

WriteLn('Самая поздняя дата: ', R.Day, ' ', R.Month, ' ', R.Year);

End.

Список литературы

1. Зуев Е.А. Язык программирования Турбо- Паскаль 6.0. – М., Унитех, 1992.

2. Немнюгин С.А. Турбо- Паскаль. – СПб.: Питер, 2000.

3. Федоренко Ю. Алгоритмы и программы на Turbo Pascal. Учебный курс.- СПб: Питер, 2001.

4. Семакин И. Г., Шестаков А. П. Основы программирования. – М.; Мастерство, 2002.

5. Могилев А.В. и др. Информатика: учебное пособие для ВУЗов. – М.; Изд. Центр «Академия», 2002.

Примечания

Готовые решения задач на языке Паскаль

К работе прилагается все исходники с расширением .pas.

Покупка готовой работы
Тема: «Решения задач на Pascal Файловый тип данных»
Раздел: Программирование, Базы данных
Тип: Контрольная работа
Страниц: 15
Цена: 400 руб.
Нужна похожая работа?
Закажите авторскую работу по вашему заданию.
  • Цены ниже рыночных
  • Удобный личный кабинет
  • Необходимый уровень антиплагиата
  • Прямое общение с исполнителем вашей работы
  • Бесплатные доработки и консультации
  • Минимальные сроки выполнения

Мы уже помогли 24535 студентам

Средний балл наших работ

  • 4.89 из 5
Узнайте стоимость
написания вашей работы

У нас можно заказать

(Цены могут варьироваться от сложности и объема задания)

Контрольная на заказ

Контрольная работа

от 100 руб.

срок: от 1 дня

Реферат на заказ

Реферат

от 700 руб.

срок: от 1 дня

Курсовая на заказ

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

от 1500 руб.

срок: от 3 дней

Дипломная на заказ

Дипломная работа

от 8000 руб.

срок: от 6 дней

Отчет по практике на заказ

Отчет по практике

от 1500 руб.

срок: от 3 дней

Решение задач на заказ

Решение задач

от 100 руб.

срок: от 1 дня

Лабораторная работа на заказ

Лабораторная работа

от 200 руб.

срок: от 1 дня

Доклад на заказ

Доклад

от 300 руб.

срок: от 1 дня

682 автора

помогают студентам

42 задания

за последние сутки

10 минут

время отклика

Похожие работы
  • Тест:

    Ответы на тест Основы искусственного интеллекта

    34 страниц(ы) 

    Есть ответы на все вопросы Форматы: Word
    Определить задачу в области ИИ и решить ее можно с применением
    пространства состояний и методов поиска
    дифференциального исчисления
    моделей знаний и логического вывода
    теории распознавания образов и методов классификации
    Какой из подходов не относится к методологии ИИ
    преставление знаний
    поиск в пространстве состояний
    интегральные уравнения
    анализ изображений
    Какое из направлений не исследуется в области ИИ
    интеллектуальное управление
    нечеткая логика
    распознавание образов
    нет верных ответов
    Какие из направлений составляют методологию ИИ
    представление задачи в пространстве состояний и методы поиска
    языки представления знаний и модели знаний
    теория экспертных систем
    нет верных ответов
    Классическое направление в ИИ использует при решении задачи методы
    интегрирования
    дифференцирования
    эвристического поиска в пространстве состояний
    логический вывод и извлечение знаний из моделей
    Бионическое направление в ИИ использует при решении задач методы
    эволюционного моделирования
    нечеткой логики
    нейронных сетей
    нет верных ответов
    Объектом исследований ИИ является
    интеллект человека
    мышление животного
    поведение насекомых
    культура человека
    Предметом исследований ИИ является
    физиология человека
    психика человека
  • Курсовая работа:

    Решение задачи «Планирование ассортимента блюд на предприятии об-щественного питания» в программной среде MS Excel

    16 страниц(ы) 

    Введение 3
    1 Аналитическая часть 5
    1.1 Постановка задачи оптимизации 5
    1.2 Построение математической модели оптимизационной задачи 6
    1.3 Обоснование и описание вычислительной процедуры решения задачи 7
    1.4 Решение задачи оптимизации аналитически 7
    2 Технологическая часть 13
    Заключение 14
  • Дипломная работа:

    Нелинейное программирование с сепарабельными функциями

    32 страниц(ы) 

    Введение--------------------------------------------------------------------------------------3
    1. Теоретические аспекты-----------------------------------------------------------------5
    1.1. Общие сведения о численных методах оптимизации---------------------5
    1.2. Методы нелинейного программирования------------------------------------6
    1. 3. Алгоритмы решения задач с ограничениями------------------------------9
    1.4. Сепарабельное программирование-------------------------------------------10
    1.5. Описание метода Дэвидона – Флетчера – Пауэлла--------------------18
    2. Выбор актуальной оптимизационной задачи-------------------------------------22
    2.1Сущность и актуальность задачи---------------------------------------------23
    2.2. Предварительная постановка задачи---------------------------------------23
    3. Строгая постановка и решение прикладной оптимизационной задачи-----24
    3.1. Строгая постановка задачи----------------------------------------------------24
    3.2. Реализация метода решения оптимизационной задачи вручную------25
    3.3. Реализация метода решения оптимизационной задачи на ЭВМ-------25
    4. Анализ результатов решения оптимизационной задачи и оценка степени достижения цели---------------------------------------------------------------------------26
    Заключение---------------------------------------------------------------------------------27
    Список литературы------------------------------------------------------------------------28
    Приложение. Листинг программы-----------------------------------------------------29
  • Дипломная работа:

    Изучение текстовых задач на уроках математики в начальных классах

    87 страниц(ы) 

    ВВЕДЕНИЕ…. 3
    ГЛАВА I. ТЕОРЕТИКО-МЕТОДОЛОГИЧЕСКОЕ ОСНОВАНИЕ ИЗУЧЕНИЯ ТЕКСТОВЫХ ЗАДАЧ НА УРОКАХ МАТЕМАТИКИ В НАЧАЛЬНОЙ ШКОЛЕ.
    1.1.Роль и место текстовых задач в содержании в курсе математики в начальной школе…7
    1.2. Подходы к изучению текстовых задач в различных методических системах…. 17
    1.3. Методическая система изучения текстовых задач в учебно-методическом комплексе «Школа России»….23
    ГЛАВА II. ОПЫТНО-ПЕДАГОГИЧЕСКАЯ РАБОТА ПО ИЗУЧЕНИЮ ТЕКСТОВЫХ ЗАДАЧ ПРИ ИЗУЧЕНИИ КУРСА МАТЕМАТИКИ В НАЧАЛЬНОЙ ШКОЛЕ.
    2.1. Инновационный проект по изучению текстовых задач в 4 классе основанное на УМК «Школа России»…40
    2.2. Этапы и содержания опытно-экспериментальной работы по использованию современных подходов к изучению текстовых задач…. ….46
    2.3. Подведение итогов опытной работы и разработка методических рекомендаций для учителей начальных классов…72
    ЗАКЛЮЧЕНИЕ….78
    ЛИТЕРАТУРА ….81
  • Курсовая работа:

    Решение задачи «Планирование поставок газированных напитков» с помощью MS Excel

    16 страниц(ы) 

    Введение 3
    1 Аналитическая часть 5
    1.1 Постановка задачи оптимизации 5
    1.2 Построение математической модели оптимизационной задачи 6
    1.3 Обоснование и описание вычислительной процедуры решения задачи 8
    1.4 Решение задачи оптимизации аналитически 11
    Заключение 15
    Список используемой литературы 17

Предыдущая работа

Решения задач на Pascal Строки

Следующая работа

Решения задач на Pascal Записи