Библиотека Рефераты Курсовые Дипломы Поиск
Библиотека Рефераты Курсовые Дипломы Поиск
сделать стартовой добавить в избранное
Кефирный гриб на сайте www.za4et.net.ru

Компьютеры, Программирование Компьютеры, Программирование

Курсовая по информатике

Наклейки для поощрения "Смайлики 2".
Набор для поощрения на самоклеящейся бумаге. Формат 95х160 мм.
10 руб
Раздел: Наклейки для оценивания, поощрения
Браслет светоотражающий, самофиксирующийся, желтый.
Изготовлены из влагостойкого и грязестойкого материала, сохраняющего свои свойства в любых погодных условиях. Легкость крепления позволяет
63 руб
Раздел: Разное
Ночник-проектор "Звездное небо и планеты", фиолетовый.
Оригинальный светильник - ночник - проектор. Корпус поворачивается от руки. Источник света: 1) Лампочка (от карманных фонариков) 2) Три
330 руб
Раздел: Ночники

Составить программу определения минимального числа цветов, необходимых для раскраски карты произвольной конфигурации таким образом, чтобы страны с одинаковой раскраской не соприкасались. Схему границ карты представить массивом. На внешних файлах расположить 3 - 4 схемы расположения стран. Итоги представить в виде текста с указанием выбранных для каждой из стран цветов. Желательно завершить программу графическим приложением. Переменные: " um" - номер файла, выбираемый пользователем. "file " - имя файла. "g - массив, используемый "генератором перебора всех вариантов" "s:array" - массив "связей" показывает, есть ли связь между странами "i" и "j". " " - количество цветов, используемых для раскраски. "max - максимально возможное количество стран (определяется при считывании данных). "s1,s2,k,j,i,a" - переменные, для работы "генератора". "f, f1" - переменные для работы с файлами. "fu c io ge :i eger;" Функция считывает текущее число, из файла связанного с переменной - "f" и ищет максимальное число из всех считанных. Пока строка = '' или символ является: - цифрой, - "-", - "." считывает символ. Если символ является: - цифрой, - "-", - ".", то он добавляется в строку "s". Строка цифр "s" преобразуется в число. Если "max" меньше числа, то "max" приравнивается считанному числу. "fu c io pr:boolea ;" Функция проверяет, можно ли страну - i закрасить цветом - g (Можно ли углубляться по дереву). Перебирает все раскрашенные страны (от "1" до "i-1") и сравнивает цвета каждой из них с цветом страны "i". "fu c io ge ( :i eger):boolea ;" Функция, определяющая возможность раскраски стран " "-ым кол-вом цветов. Каждому элементу массива "g" присваивает значение равное "0". Текущему номеру рассматриваемой страны "i" задает значение "1". Повторяет действия: Повторяет действие: К номеру цвета рассматриваемой страны прибавить "1" ("g 1;"), пока нельзя страну "i" раскрасить в цвет "g" или цвет "i"-ой страны не больше числа " ". Если цвет "i"-ой страны больше числа " " то: номеру цвета рассматриваемой страны приравнивает "0" и понижает номер рассматриваемой страны на "1". Иначе повышает номер рассматриваемой страны на "1", пока номер рассматриваемой страны не равен "1" или номер рассматриваемой страны не больше количества стран. Значение функции равно " rue", если номер рассматриваемой страны больше количества стран. Основная программа: Вывод сообщений пользователю (см. рабочую программу) Запрос номера файла (" um"). Выполняются действия в переменную " um" запрашивается символ нажатой клавиши, если нажата клавиша не от 1 до 3 то выводится сообщение об ошибке пока не нажата клавиша от 1 до 3. Формируется имя исходного файла file :='i pu ' um '. x '. Сообщение пользователю о выбранном файле. Считывание данных Открывается файл "file " для считывания данных. "max:=0". Каждой ячейке массива связей присваивается “ложь” Пока файл не кончился считываются пара стран, в массив связей с индексами: присваивается значение истина. Закрывается файл "file ". Блок, определяющий минимальное количество цветов. Начальное количество цветов = 1. Повторять действия: Повысить количество цветов на единицу.

Пока не возможна раскраска всех стран данным количеством цветов. Запись данных. Создать файл "Ou pu . x ". Считать в него количество цветов. Считать в него список раскраски стран. Закрыть файл. Текст программы program mag; uses cr ; var um:char; file :s ri g; g:array of boolea ; max,s1,s2,j, ,i,a:i eger; f:file of char; f1: ex ; { Функция считывает текущее число, из файла связанного с пеpеменной - f. } fu c io ge :i eger; var k,c:i eger; s:s ri g; ch:char; begi s:=''; k:=50; while ((s='')or(k=43)or(k=45)or((k>47)a d(k begi read(f,ch); k:=ord(ch); if (k=43)or(k=45)or((k>47)a d(k e d; val(s,c,k); if max< c he max:=c;> ge :=c; e d; { Функция проверяет, можно ли страну - i закрасить цветом - g. } fu c io pr:boolea ; var j:i eger; begi pr:= rue; if i>1 he for j:=1 o i-1 do if s he pr:=false; e d; fu c io ge ( :i eger):boolea ; begi for j:=1 o max do g 1; u il pr or (g:=0; i:=i-1; e d else i:=i 1; u il (i=1)or(i>max); ge :=i>max; e d; begi clrscr; wri el (' Haжмите цифру, указывающую номер файла'); wri el (' с которого будут счтываться данные. '); wri el (''); for i:=1 o 3 do wri el (' ',i,' - файл i pu ',i,'. x '); {Запpос номеpа файла.} repea um:=readkey; if o (( um='1')or( um='2')or( um='3')) he wri el (' Вы в чем-то ошиблись'); u il ( um='1')or( um='2')or( um='3'); file :='i pu ' um '. x '; wri el (''); wri el (' Выбран файл - ',file ); wri el (''); {Считывание данных} Assig (f,file ); Rese (f); max:=0; for s1:=1 o 100 do for s2:=1 o 100 do s:=false; while o eof(f) do begi s1:=ge ; s2:=ge ; if s1>s2 he s:= rue; e d; Close(f); :=1; repea := 1; u il ge ( ); { Вывод данных в файл - 'ou pu . x '.} Assig (f1,'ou pu . x '); Rewri e(f1); wri el (f1,' Число стран = ',max); wri el (f1,''); wri el (f1,' cтран = ', ); for j:=1 o max do wri el (f1,'cтрана - ',j,', цвет - ',g,' '); Close(f1); e d. Koнец. Данные из I pu 1. x : 1 2 1 7 2 7 2 3 2 8 3 4 3 9 3 8 4 9 4 5 5 6 5 9 5 13 6 13 6 14 6 15 7 8 7 11 8 9 8 10 8 11 9 10 9 12 9 13 10 11 10 12 10 14 11 15 12 14 13 14 14 15 Результат в ou pu . x : Число стран = 15 стран = 4 страна - 1, цвет - 1 страна - 2, цвет - 2 страна - 3, цвет - 1 страна - 4, цвет - 2 страна - 5, цвет - 1 страна - 6, цвет - 2 страна - 7, цвет - 3 страна - 8, цвет - 4 страна - 9, цвет - 3 страна - 10, цвет - 1 страна - 11, цвет - 2 страна - 12, цвет - 2 страна - 13, цвет - 4 страна - 14, цвет - 3 страна - 15, цвет - 1 1. Дана функция f(x) = a b x Si (c x d), в которой коэффициенты a, b, c, d определяются функцией R d с использованием процедуры Ra domize. Постоянная k определяется в интервале c шагом 0.01. Составить программу определения первой точки пересечения прямой y = k x с функцией f для x>0. Текст программы: CLS RA DOMIZE 1000 I PU "точность"; a1 = R D(100) q1 = R D(90) q2 = R D(80) q3 = R D(110) DEF f f (x) = a1 q1 x SI (q2 x q3) - k x a = 0: b = 110 FOR k =.1 O.2 S EP.01 GOSUB pod1 GOSUB pod2 PRI "при k="; k cor = (x1 x2) / 2: y = f f(cor) k x PRI "точка пересечения" PRI "x="; cor; "y="; y; a = x2 EX k PRI "Точность"; E D a = x2 EX k PRI "Точность"; E D pod1: 'отделение корней в интервале а,в' s = 10 : x = a 200 : p = f f(x) f(x s) IF p > 0 HE 1 x1 = x: x2 = x s: RE UR 1 x = x s: IF x RE UR pod2: 'уточнение корня' 10 x = (x1 x2) / 2: y = f f(x) IF f f(x1) y > 0 HE x1 = x ELSE x2 = x IF ABS(x2 - x1) > HE 10 RE UR Данные: a = 0 b = 110 точность?.0

01 Результаты: при k=.1 точка пересечения x=.0096875 y=.7444314 при k=.11 точка пересечения x=.0196875 y=.7470496 при k=.12 точка пересечения x=.0296875 y=.7497169 при k=.13 точка пересечения x=.0396875 y=.7524328 при k=.14 точка пересечения x=.0496875 y=.7551972 при k=.15 точка пересечения x=.0596875 y=.7580096 при k=.16 точка пересечения x= 6.968751E-02 y=.7608697 при k=.17 точка пересечения x= 7.968751E-02 y=.7637773 при k=.18 точка пересечения x=.0896875 y=.7667319 при k=.19 точка пересечения x=.0996875 y=.7697333 2. Известны координаты вершин четырехугольника A, B, C, D. Найти точку пересечения его диагоналей и наибольший радиус окружности, которая имеет центр в этой точке и полностью лежит внутри этого четырехугольника. Координаты точек расположить на гибком диске. Текст программы: REM Программа нахождения точки пересечения диагоналей 4-х угольника REM и наибольшего радиуса окружности лежащей в нем. CLS OPE "a:zad2.da " FOR I PU AS #1 OPE "a:zad2. x " FOR OU PU AS #2 DIM r(6) I PU #1, x1, y1, x2, y2, x3, y3, x4, y4 x = ((x3 y2 - x2 y3) (x4 - x1) - (x4 y1 - x1 y4) (x3 - x2)) / ((y4 - y1) (x3 - x2) - (y3 - y2) (x4 - x1)) y = ((y4 - y1) (x - x1) / (x4 - x1)) y1 r(1) = ABS((x2 - x1) y - (y2 - y1) x x1 y2 - y1 x2) / SQR((x2 - x1) ^ 2 (y2 - y1) ^ 2) r(2) = ABS((x3 - x2) y - (y3 - y2) x x2 y3 - y2 x3) / SQR((x3 - x2) ^ 2 (y3 - y2) ^ 2) r(3) = ABS((x4 - x3) y - (y4 - y3) x x3 y4 - y3 x4) / SQR((x4 - x3) ^ 2 (y4 - y3) ^ 2) r(4) = ABS((x1 - x4) y - (y1 - y4) x x4 y1 - y4 x1) / SQR((x1 - x4) ^ 2 (y1 - y4) ^ 2) r(5) = ABS((x3 - x1) y - (y3 - y1) x x1 y3 - y1 x3) / SQR((x3 - x1) ^ 2 (y3 - y1) ^ 2) r(6) = ABS((x4 - x2) y - (y4 - y2) x x2 y4 - y2 x4) / SQR((x4 - x2) ^ 2 (y4 - y2) ^ 2) mi = r(1) FOR i = 2 O 6 IF r(i) = 0 HE GO O 5 IF r(i) < mi HE mi = r(i)> 5 EX i PRI "Точка пересечения диагоналей O ("; x; ","; y; ")" PRI "Радиус окружности лежащей в 4-х угольнике ABCD, R=", mi PRI #2, "Точка пересечения диагоналей O ("; x; ","; y; ")" PRI #2, "Радиус окружности лежащей в 4-х угольнике ABCD, R=", mi Данные с диска а: 1,1 2,1 1,2 2,2 Результаты: Точка пересечения диагоналей O ( 1.5, 1.5 ) Радиус окружности лежащей в 4-х угольнике ABCD, R=.5 3. Элементы двумерного массива Q(m, ) (m> ) определяются по одной из формул : - если номер строки i < номера столбца j,то элемент Q(i, j) вычисляется по формуле> - если i < j, то Q(i, j) = eR d Si (R d-0.5),> - если i = j, то Q(i, j)=Log(10 R d)/Si (R d), - если i > j, то Q(i, j)=R d Q(j,i). По полученным таким образом данным найти и выдать на печать : - строку с наибольшим средним значением элементов, - строку, в которой разность рядом стоящих элементов - наименьшая, - Элементы квадратной матрицы ( , ), c максимальной суммой диагональных элементов. Текст программы: CLS 2 I PU "Число строк столбцов"; m, IF m >= HE 1 PRI "Число строк должно быть больше числа столбцов": GO O 2 1 DIM q(m, m) FOR i = 1 O m FOR j = 1 O m IF i < j HE q(i, j) = EXP(R D) SI (R D -.5)> IF i = j HE q(i, j) = LOG(10 R D) / SI (R D) IF i > j HE q(i, j) = R D q(j, i) EX j EX i FOR i = 1 O m FOR j = 1 O PRI USI G "##.### "; q(i, j); EX j PRI EX i DIM s(m) FOR i = 1 O m f = 0 FOR j = 1 O f = f q(i, j) EX j: s(i) = f / EX i PRI PRI "Строка с наибольшим средним значением" max = s(1) FOR j = 1 O FOR i = 1 O m IF s(i) >= max HE max = s(i): ii = i EX i PRI USI G "##.#

Какие отсталые взгляды на элементарные нормы профилактики и охраны здоровья! И как это не согласуется с результатами физических экспериментов сегодняшнего дня. Здесь тривиальная путаница: научное мировоззрение не может отвергать очевидные факты, которые обнаруживаются в феномене Кулагиной, Оно должно объяснять их, прибегнув к эксперименту, научно обоснованному анализу. При чем тут "покушение на здравый смысл", когда есть элементарно достигнутый результат! Кроме того, за 20 лет наука решительно продвинулась вперед. Далее в статье следуют нападки на ученых. "В распространении, мягко сказать, фантастических высказываний о телепатии,- читаем мы на странице 40,- сыграла секция информатики при НТО радиотехники, электроники и связи имени А. С. Попова (ныне закрытая за ненадобностью). Неблаговидную роль в раздувании никому не нужного ажиотажа вокруг "таинственных" явлений играют и ученые с достаточно громкими званиями..." Еще цитата: "Врач районного психоневрологического диспансера открыл у своей пациентки К. "чудесные" способности: читать локтем, на ощупь находить по цвету карандаши, угадывать образы, которые мысленно видит другой человек

1. Исследование путей повышения эффективности работы гусеничного двигателя /1-3/

2. Лабораторная работа по химии 1-3 (NPI)

3. Конечный вариант экзаменационных билетов и предварительный приблизительный список вопросов по лингвистическим основам информатики за весенний семестр 2001 года

4. Тесты по информатике с ответами. Вариант 6

5. Тесты по информатике. Вариант 2

6. Тесты по информатике с ответами. Вариант 1
7. Контрольная работа по муниципальному праву Вариант 2
8. Пояснительная записка к выполнению расчетной работы по дисциплине "информатика"

9. Лабораторная работа номер 5 по информатике

10. Контрольная работа по информатике

11. Методические рекомендации по выполнению выпускной квалификационной работы бакалавра физико-математического образования профиль информатика

12. Контрольная работа по информатике

13. Лабораторные работы по информатике

14. Лабораторная работа по информатике ( задания )

15. Разработка схемы дискового почвообрабатывающего орудия, расчет основных параметров и анализ его работы. (вариант №1, №20)

16. Организационные формы и содержание внеклассной работы по информатике

Точилка электрическая "Office style", красная.
Отлично заточенные карандаши. Экономия времени. Съемный вместительный контейнер для стружки. Легко очищаемые стальные лезвия. Длина
977 руб
Раздел: Точилки
Ящик "Колор-стайл", 18 л.
Ящик универсальный. Материал: пластик. Объем: 18 л. Размеры: 400х335х170 мм.
313 руб
Раздел: Более 10 литров
Игрушка антистресс "Подушка".
Мягкая подушка не оставит равнодушным ни ребенка, ни взрослого и вызовет улыбку у каждого, кто ее увидит. Необычайно мягкая, она принесет
334 руб
Раздел: Антистрессы

17. Великобритания (расширенный вариант реферата 9490)

18. Правовая информатика

19. Кримінальний кодекс України (Проект криминального кодекса Украины, варианты 1998-2001гг.)

20. Основные лексические и грамматические различия между британским и американским вариантом английского языка

21. Все темы (информатика) за 3-й семестр в СТЖДТ

22. Ответы на билеты по информатике. 11 класс. Выпускной экзамен
23. Информатика
24. Новейшие достижения в информатике

25. Информация, информатика, базы данных. Периферийные устройства

26. Информатика

27. Задача про транспортную систему. Подбор вариантов проезда с учетом кол-ва пересадо, длительности, видов транспорта (самолет, авто, поезд, водн.) (и класса)

28. Лекции по курсу "Информатика"

29. Билеты по информатике 10 класс: Visual Basic

30. Билеты и ответы по Информатике за 11-й класс

31. Информация и информатика

32. Экзаменационные билеты по информатике

Зонт "Самурай".
Материал: пластик. Зонт - трость механический, с чехлом. Длина зонта: 98 см. Диаметр: 110 см.
778 руб
Раздел: Зонты-трости
Палатка игровая.
Игрушка изготовлена из высококачественных материалов. Размер палатки: 73х71х83 см.
889 руб
Раздел: Игровые палатки
Набор мягких кубиков "Предметы".
Кубики помогут вашему малышу в развитии сенсорных способностей (восприятия цвета и формы предметов), а также подвижности пальцев (мелкой
368 руб
Раздел: Маленькие (до 30 см)

33. Контрольные по информатике для заочников (вопросы по Windows, Word, Excel)

34. Предмет правовая информатика

35. Формулы и шпоры 10-11 кл. (информатика, геометрия, тригонометрия ...) (Шпаргалка)

36. Правовая информатика

37. Обучение информатике по опорным сигналам

38. Изучение файловых систем в профильном курсе информатики
39. Основные лексические и грамматические различия между британским и американским вариантом английского языка
40. Процесс сжигания хлора (Упрощенный вариант для нетехнических специальностей)

41. Социальная информатика

42. Основные фонды предприятия информатики

43. Информатика (полный курс)

44. Контрольная по информатике

45. Контрольная по информатике

46. Основные понятия информатики

47. Символика в романе А. С. Пушкина "Евгений Онегин" (сон Татьяны) (вариант 2)

48. Вариант билетов по логистике

Канцелярский детский набор "Пигги", 4 предмета.
4 отделения. 4 предмета. Подставка в форме поросенка.
522 руб
Раздел: Наборы настольные
Маркер для плиточных швов E-8200.
Улучшает цвет швов между кафелем. В состав чернил входит фунгицид, предотвращающий образование плесенного грибка. Нестираемые водостойкие
311 руб
Раздел: Золотые, серебряные
Набор "Свеча-таблетка светодиодная".
Представляем вам безопасные LED свечи. Внутри у них расположены светодиодные лампочки, которые работают от батареи. Корпус свечей
541 руб
Раздел: Свечи светодиодные, электрические

49. Алгебра Дж. Буля и ее применение в теории и практике информатики

50. Определение рационального варианта размещения производственно-хозяйственных предприятий (на примере АБЗ) и выбор оптимального маршрута поездки коммивояжера

51. Неврастения как вариант астенического синдрома

52. Сопоставимость альтернативных вариантов управленческих решений

53. Синтез цифрового конечного автомата Мили - вариант 3

54. Контрольные по информатике
55. Экзаменационные билеты и вариант вопросов за весенний семестр 2001 года по предмету МЕЖДУНАРОДНАЯ ТОРГОВЛЯ И МЕЖДУНАРОДНЫЙ КОНТРАКТ
56. Методы интеграции информатики с другими дисциплинами в школьном курсе

57. Обучение информатике

58. Программа непрерывного обучения информатике со 2 по 11 класс

59. Урок информатики: “Вот компьютер - верный друг”

60. Проектные технологии обучения информатике: когнитивный анализ результатов опроса учителей

61. Формирование содержания предмета информатика и ИКТ для информационно - технологического профиля

62. Социализм и информатика Н.Н. Моисеева

63. Информатика и информационные технологии в системе повышения квалификации преподавателей и тренеров в области физкультуры

64. Российский вариант ресентимента (социокультурные истоки кризиса рациональности)

Ящик для хранения, штабелируемый, 60 л, синий.
Ящики вкладываются один в другой, что экономит место в офисе или на складе при транспортировке и хранении. Длинные боковые стороны имеют
651 руб
Раздел: Более 10 литров
Уничтожь меня! Уникальный блокнот для творческих людей. Смит К.
Перед вами книга-сенсация, проданная миллионными тиражами по всему миру. Поздравляем, теперь и вы сможете приобщиться к разрушительному
397 руб
Раздел: Блокноты оригинальные, шуточные
Папка-уголок А4 "Semi-Clear Extra Light L-FILE", красная.
Формат: А4. Цвет: красный.
536 руб
Раздел: Папки-конверты, папки-уголки

65. Сто вариантов малого бизнеса

66. Япония: восточный вариант капиталистического развития

67. Различные варианты создания финансово-промышленных холдингов

68. Институционализм (Американский вариант )

69. Варианты

70. Вариант 7
71. Колонцифры, основные варианты их набора и вёрстки
72. Билеты по информатике

73. Информатика

74. Некоторые системные и методологические аспекты информатики и информатизации

75. Так что же такое информатика?

76. Шпаргалки по информатике

77. Информатика

78. Вопросы по информатике

79. Лекции по информатике

80. Cостязания по информатике (олимпиады)

Тарелка глубокая "Амет", 0,8 л.
Тарелка глубокая изготовлена из высококачественной нержавеющей стали, благодаря которой будет верно Вам служить не один сезон. Материал
368 руб
Раздел: Столовые тарелки
Опора для балдахина Карапуз "Ромашка".
Держатель балдахина крепится к короткой либо к длинной стороне кроватки, в зависимости от размера и формы балдахина. Чтобы накрыть
310 руб
Раздел: Аксессуары для кроваток
Светильник "Плазма №5".
Размеры светильника: 22х11х11.5 см. Диаметр лампы: 11 см. Плазменный светильник в виде шара на подставке, при включении создаёт внутри
1168 руб
Раздел: Необычные светильники

81. Информатика

82. Информатика

83. Информатика EXCEL

84. Курсовая по информатике

85. Лаба по информатике

86. Ответы к экзамену по специальности Информатик-технолог
87. Ответы на билеты по Информатике (1 курс, 2 семестр)
88. Экономическая информатика

89. Информатика и информационные технологии

90. Варианты алгоритма возведения в степень: повышение точности и ускорение

91. Вопросы по информатике

92. Экзаменационные билеты по информатике 2000/2001 учебный год

93. Дидактические материалы по информатике

94. Информатика и ВТ

95. Вопросы по информатике

96. Математика и информатика в проведении гуманитарных исследований

Книга - ежедневник для записей "Дела дамские".
Линованный блокнот в твёрдом переплёте, обложка которого повторяет оформление популярных в прошлом веке изданий. Названия старинных книг и
352 руб
Раздел: Блокноты оригинальные, шуточные
Подставка для украшений Jardin D'Ete "Индийская сказка".
Подставка для ювелирных изделий не оставит равнодушной ни одну любительницу изысканных вещей. Сочетание оригинального дизайна и
505 руб
Раздел: Подставки для украшений
Игра для взрослых "Туалетный футбол".
Не теряйте времени зря! Необычный набор для игры в футбол поможет вам использовать для развития сноровки те минуты, которые раньше
808 руб
Раздел: Прочее

97. Возможные варианты по управлению дебиторской задолженностью с использованием информационных систем

98. Варианты лесозаготовок

99. Незавершенное производство, выбор вариантов его учета и оценка остатков

100. Управленческий учет как элемент системы управления финансами предприятия и варианты его организации


Поиск Рефератов на сайте za4eti.ru Вы студент, и у Вас нет времени на выполнение письменных работ (рефератов, курсовых и дипломов)? Мы сможем Вам в этом помочь. Возможно, Вам подойдет что-то из ПЕРЕЧНЯ ПРЕДМЕТОВ И ДИСЦИПЛИН, ПО КОТОРЫМ ВЫПОЛНЯЮТСЯ РЕФЕРАТЫ, КУРСОВЫЕ И ДИПЛОМНЫЕ РАБОТЫ. 
Вы можете поискать нужную Вам работу в КОЛЛЕКЦИИ ГОТОВЫХ РЕФЕРАТОВ, КУРСОВЫХ И ДИПЛОМНЫХ РАБОТ, выполненных преподавателями московских ВУЗов за период более чем 10-летней работы. Эти работы Вы можете бесплатно СКАЧАТЬ.