Разработать алгоритм и составить программу на языке Паскаль

  • ID: 43508 
  • 15 страниц
300 рубСкачать

гарантия низкой цены

KONTR1 2.bak

KONTR1 2.exe

KONTR1 2.pas

KONTR2.bak

KONTR2.exe

KONTR2.pas

KONTR.bak

KONTR.exe

KONTR.pas

Отчет.docx

Содержание:


Задание

1)Разработать алгоритм и составить программу на языке Паскаль (не менее 20 значений).

2)Алгоритм и составить программу на языке Паскаль для обработки последнего файла с целью выдачи на печать в виде таблицы информации в соответствии с заданием.

Задание №1.

Данные о товарах фирмы «Твин», у которых затраты на закупку составляют 20% от всех видов затрат.

Наименование товара.

Заказчик.

Затраты на закупку.

Транспортные затраты.

Хранение на складе.

Реализация.

Прибыль.

Прибыль записывается в файл как результат расчета.

Дана матрица размером 6*6.Разработать схемы алгоритмов подпрограмм и вызывающей программы , а затем описав общий алгоритм в виде программы на языке Паскаль ,включающей в себя процедуру или функцию. В вызывающей программе необходимо предусмотреть вывод на экран исходной матрицы.

Определить номер столбца с наименьшей суммой положительных элементов.

Алгоритм

Программа 1 – ввод данных, заполнение файла данных, просмотр данных.

Алгоритм основной программы:

[image]

Алгоритмы подпрограммы Pribil

Pribil:

[image]

Алгоритм подпрограммы Print_All

[image]

[image]

Подпрограмма Start

[image]

Подпрограмма Print

[image]

[image]

Подпрограмма MinNumColumn

[image]

Результат выполнения программы

Задание1. Программа1.

[image]

Задание 1. Программа 2

[image]

Задание 2

[image]

Листинг программы

Uses Crt;

Type T_P = record

tovar: string[20];