Основы программирования и алгоритмизации - Программирование, компьютеры и кибернетика курсовая работа

Основы программирования и алгоритмизации - Программирование, компьютеры и кибернетика курсовая работа




































Главная

Программирование, компьютеры и кибернетика
Основы программирования и алгоритмизации

Методика создания программы, которая выбирает лучшей результат и выводит его на экран с сообщением, что это лучшей результат. Анализ процедуры распознавания простых чисел. Алгоритм и текст программы, переписывающей компоненты файла в обратном порядке.


посмотреть текст работы


скачать работу можно здесь


полная информация о работе


весь список подобных работ


Нужна помощь с учёбой? Наши эксперты готовы помочь!
Нажимая на кнопку, вы соглашаетесь с
политикой обработки персональных данных

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ
ОРЛОВСКИЙ ГОСУДАРСТВЕННЫЙ ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ
Основы программирования и алгоритмизации
Специальность Автоматизация технологических процессов и производств
Специальность Автоматизация технологических процессов и производств
1. В ЭВМ поступают результаты соревнований по плаванию для трех спортсменов. Составьте программу, которая выбирает лучшей результат и выводит его на экран с сообщением, что это лучшей результат.
2. Дано натуральное число n. Составить программу, определяющую, есть ли среди чисел n, n+1,...,2n близнецы, т.е. простые числа, разность между которыми равна 2. (Использовать процедуру распознавания простых чисел).
3. Найдите сумму элементов массива ниже главной диагонали, произведение не равных нулю элементов выше главной диагонали и количество элементов в главной диагонали, попадающих в интервал [-1;1].
4. Опишите множества М1 (1, 2,3) и M2 (1, 4, 2, 5). Получите результирующие множество M3=M1*M2. Определите, имеются ли в M3 элементы 1 и 2.
5. Создайте файл, компоненты которого являются целыми числами. Напишите программу, переписывающую компоненты файла в обратном порядке.(Новый файл не заводить).
Задание принял к исполнению «__» ____________ 2009 г.
Название программы введено после program, в данном задание это - Zadanie1. Далее с помощью var выделены ячейки памяти под переменные X1, X2, X3, res вещественного типа данных. После begin написан ход работы программы из последовательности операторов.
С помощью операторов writeln и readln описывается, что нужно ввести и записывается введенный результат в память, соответственно. Таким образом, вводим результаты спортсменов X1, X2, X3.
Далее с помощью условных операторов if определяем наименьший результат, который присваивается переменной res: if X1X3 then res:=X3;. С помощью оператора writeln на экран выдается сообщение с результатом победителя заплыва.
Название программы введено после program, в данном задание это - Zadanie2. Далее с помощью var выделены ячейки памяти под переменные j, B, N типа данных word и массива а логического типа данных. После begin написан ход работы программы из последовательности операторов.
С помощью процедуры Pch определяем все простые числа, используемые в программе. Далее оператором writeln выводим сообщение о том, что ниже будут выдаваться числа близнецы.
Создаем цикл: for j:=N to 2*N do, где будет проверяться условие, что разность между числами равна 2. Если условие верно, то выдаются на экран сравнивающиеся числа, которые и будут близнецы.
Кроме общих переменных заданных в программе в процедуре используются внутренние переменные b, k типа данных word. Задаем диапазон, на котором будем выделять простые числа. Далее создаем цикл: for j:=2 to 2*N do, в котором всем значениям массива а присваиваем значение TRUE. С помощью нескольких циклов в цикле: while k<=b do, всем не простым числам в массиве а присваиваются значения FALSE.
Таким образом получаем массив а, где простые числа отмечены TRUE. Закрытие процедуры - end.
Название программы введено после program, в данном задание это - Zadanie3. Далее с помощью var выделены ячейки памяти под переменные i, j, K, n, m типа данных byte, переменные S, Pr и массив a[1..255,1..255] вещественного типа данных. После begin написан ход работы программы из последовательности операторов.
Вводим размерность матрицы NxM, далее с помощью цикла: for j:=1 to m dо в цикле: for i:=1 to n do задаем все значения массива а.
Следующий этап - создаем цикл: for j:=1 to (i-1) do в цикле: for i:=2 to n do, где будут перебираться только элементы ниже главной диагонали и находим их сумму. Далее создаем цикл: for i:=1 to (j-1) do в цикле: for j:=2 to m do, где будут перебираться только элементы выше главной диагонали. Проверяем условие не равности нулю каждого элементы и находим их произведение: if a[i,j]<>0 then Pr:=Pr*a[i,j].
Далее в цикле: for i:=1 to n do, j присваиваем значение i, то есть перебираем только элементы главной диагонали, где проверяем принадлежность этих элементов диапазону [-1;1] и считаем это количество.
С помощью операторов writeln на экран выдаем результат. Закрытие программы - end.
Название программы введено после program, в данном задание это - Zadanie4. Далее с помощью const заданы константы, множества M1=[1,2,3] и M2=[1,4,2,5], а с помощью var выделены ячейки памяти под множество M3 типа данных byte. После begin написан ход работы программы из последовательности операторов.
С помощью оператора writeln выводим сообщение о том, что даны множества М1и M2. Далее находим множество М3: М3:=M1*M2. С помощью условных операторов if проверяем наличие в множестве М3 элементов 1 и 2, после чего выдается соответствующее сообщение.
С помощью строки readln (); выполнение программы автоматически не закроется, что позволит посмотреть результат, а закрытие осуществляется после нажатия кнопки Enter. Закрытие программы - end.
Название программы введено после program, в данном задание это - Zadanie5. Далее с помощью var выделены ячейки памяти под переменные i целого типа данных, k, j типа данных byte, массив а и f файл с целым типом данных. После begin написан ход работы программы из последовательности операторов.
Оператором assign устанавливаем связь между программой и файлом zadanie5.txt. Далее командой rewrite (f); открываем (создаем) файл для записи. Вводим количество вводимых чисел в файл. С помощью цикла: for j:=1 to k do, вводим поочередно k целых чисел, а с помощью команды write (f,i); записываем эти числа в файл.
Далее открываем файл, только в этот раз для чтения reset (f). И прочитываем все значения i и записываем их в массив a. Далее командой rewrite (f) опять открываем файл для записи и с помощью цикла: for j:=k downto 1 do, записываем значения массива а в файл f в обратном порядке.
Далее открываем файл для чтения reset (f). И прочитываем все значения. Затем с помощью цикла: for j:=1 to k do, командой read (f,a[j]) читаем числа и выводим их на экран через пробел: write (a[j],' ').
writeln ('Введите результат 1 спортсмена: ');
writeln ('Введите результат 2 спортсмена: ');
writeln ('Введите результат 3 спортсмена: ');
if X1Основы программирования и алгоритмизации курсовая работа. Программирование, компьютеры и кибернетика.
Реферат: Сутність і походження релігії
Курсовая работа: Разработка АИС "Страховая компания"
Сущность Наказания В Виде Принудительных Работ Эссе
Анализ Эффективности Инвестиционных Проектов Курсовая
Эссе Камуфлирующий Лак Для Ногтей
Реферат: Творчество Софокла
Курс Лекций На Тему Россия С Древних Времен И До Наших Дней
Итоговое Сочинение Как Научиться Понимать Самого Себя
Контроль И Ревизия Прочих Расходов Реферат
Курсовая работа по теме Технология приготовления сложного горячего блюда из морских ракообразных
Реферат по теме Проблема систематики в психиатрии историко-эпистемологический аспект
Контрольная работа: Особенности антикризисной программы "Группы двадцати"
Хозяева Темного Царства Сочинение
Контрольная работа: Государственные социальные гарантии и средний класс
Курсовая Работа На Тему Сезонная Динамика Фитопланктона Средней Оби В 2007-2008 Гг.
Написать Сочинение По Картине Серебрякова За Обедом
Реферат: Beowulf 13 Essay Research Paper Beowulf
Автореферат На Тему Вич-Инфекция
Реферат по теме Негаторный иск в современном отечественном и римском частном праве
Определение коэффициента поверхностного натяжения методом компенсации давления Лапласа
Символика цвета в странах востока - Культура и искусство презентация
Особенности формирования имиджа компании методами связей с общественностью (на примере деятельности ветеринарной клиники "Оберег") - Маркетинг, реклама и торговля дипломная работа
История политических учений - Политология контрольная работа


Report Page