Электронная картотека планет солнечной системы

Коврик для запекания, силиконовый "Пекарь".
Коврик "Пекарь", сделанный из силикона, поможет Вам готовить вкусную и красивую выпечку. Благодаря материалу коврика, выпечка не
202 руб
Раздел: Коврики силиконовые для выпечки

Браслет светоотражающий, самофиксирующийся, желтый.
Изготовлены из влагостойкого и грязестойкого материала, сохраняющего свои свойства в любых погодных условиях. Легкость крепления позволяет
66 руб
Раздел: Прочее

Горшок торфяной для цветов.
Рекомендуются для выращивания крупной рассады различных овощных и цветочных, а также для укоренения саженцев декоративных, плодовых и
7 руб
Раздел: Горшки, ящики для рассады

Текст программы:#i clude #i clude #i clude #i clude #i clude s ruc PL //Задание структурных переменных { char amepl; u sig ed i spu ik; PL prev; PL ex ; };void me u1() //Функция главного меню { clrscr(); pri f( &quo ; ║ ║ &quo ;); pu s( &quo ; ║ К А Р Т О Т Е К А П Л А Н Е Т ║ &quo ;); &quo ; ║ С О Л Н Е Ч Н О Й С И С Т Е М Ы ║ &quo ;); pu s( &quo ;); pu s(&quo ; Главное меню : &quo ;); pu s(&quo ; 1- Рекомендации пользователю.&quo ;); pu s(&quo ; 2- Ввод данных.&quo ;); pu s(&quo ; 3- Вывод всех данных.&quo ;); pu s(&quo ; 4- Просмотр, удаление, добавление.&quo ;); pu s(&quo ; 5- Вывод данных по определенному признаку.&quo ;); pu s(&quo ; 6- Сортировка.&quo ;); pu s(&quo ; 7- Выход.&quo ;); }void me u2() //Меню поиска элементов { pu s(&quo ; Меню поиска: &quo ;); pu s(&quo ; 1- Вывод по названию планеты.&quo ;); pu s(&quo ; 2- Вывод по году открытия.&quo ;); pu s(&quo ; Для выхода в главное меню нажмите любую клавишу.&quo ;); }void sove (char s) //Функция подсказки { wi dow(1,25,79,25); ex color(GREE BLUE); ex backgrou d(WHI E YELLOW); clrscr(); cpri f(&quo ; %s&quo ;,s); ex color(10); wi dow(1,1,79,25); ex backgrou d(0); }void vvod(PL pla) //Функция ввода структуры { do { clrscr(); pu s(&quo ;Введите имя планеты :&quo ;); fflush(s di ); ge s(pla-> amepl); } while(s rle (pla-> amepl)>18); do { pu s(&quo ;Год открытия планеты :&quo ;); sca f(&quo ;%d&quo ;,&(pla->year)); } while((pla->year)year)>30000); do { pu s(&quo ;Кто открыл планету :&quo ;); fflush(s di ); ge s(pla->people); } while(s rle (pla->people)>15); do { pu s(&quo ;Сколько спутников ?&quo ;); sca f(&quo ;%d&quo ;,&(pla->spu ik)); } while(((pla->spu ik)spu ik)>999)); }PL vvodall() //Функция ввода структур { PL play , pla; clrscr(); sove (&quo ;Введите параметры планеты&quo ;); pla=(PL )malloc(sizeof(PL)); vvod(pla); play =pla; pla-> ex = ULL; sove (&quo ;Для дальнейщего ввода нажми y, иначе любую клавишу.&quo ;); while (ge ch()=='y') { clrscr(); sove (&quo ;Введите параметры планеты&quo ;); pla=(PL )malloc(sizeof(PL)); vvod(pla); play ->prev=pla; pla-> ex =play ; play =pla; sove (&quo ;Для дальнейщего ввода нажми y, иначе любую клавишу.&quo ;); } pla->prev= ULL; while (pla-> ex ) pla=pla-> ex ; re ur (pla); }void vivodall(PL pla) //Функция вывода на экран всех структур { i i=1; pu s(&quo ; В С Я К А Р Т О Т Е К А &quo ;); pri f(&quo ;│ Номер│ Название │ Когда │ Кто открыл │ Кол-во │ &quo ;); pri f(&quo ;│ стр. планеты │ открыли │ планету │ спутников │ &quo ;); while (pla->prev) { pri f(&quo ;│ %5d │ %18s │ %12u │ %15s │ %11u │ &quo ;,i,pla-> amepl, pla->year,pla->people,pla->spu ik); pla=pla->prev; i ; } pri f(&quo ;│ %5d │ %18s │ %12u │ %15s │ %11u │ &quo ;,i,pla-> amepl, pla->year,pla->people,pla->spu ik); go oxy(22,24); pu s(&quo ;Вывод закончен, нажмите любую клавишу.&quo ;); ge ch(); }void spisok(PL pla) //Функция для работы со списком { clrscr(); wi dow(17,2,62,15); ex backgrou d(4); ex color(15); clrscr(); if (pla!= ULL) { cpri f(&quo ; &quo ;); cpri f(&quo ;%30s&quo ;,&quo ;ПАРАМЕТРЫ ПЛАНЕТ &quo ;); go oxy(1,wherey() 2); cpri f(&quo ; Название: %s&quo ;,pla-> amepl); go oxy(1,wherey() 2); cpri f(&quo ; Год открытия: %d&quo ;,pla->year); go oxy(1,wherey() 2); cpri f(&quo ; Кто открыл: %s&quo ;,pla->people); go oxy(1,wherey() 2); cpri f(&quo ; Сколько спутников: %d&quo ;,pla->spu ik); } ex backgrou d(2); sove (&quo ;Cледующая/Предыдущая планета(PgD /PgUp)&quo ; }PL vvodspisok(PL pla) //Функция ввода элементов списка { PL plr=pla; char c; sove (&quo ;Добавить элемент до / после текущего(Home/E d)&quo ; &quo ;Отмена(Esc)&quo ;); do { c=ge ch(); / Esc / if (c==27) re ur (pla); if (c==71 c==79) { clrscr(); sove (&quo ;Введите параметры планеты&quo ;); plr=(PL )malloc(sizeof(PL)); vvod(plr); if (pla== ULL) { plr-> ex = ULL; plr->prev= ULL; re ur (plr); } / E d / if (c==79) { plr-> ex =pla-> ex ; plr->prev=pla; pla-> ex =plr; (plr-> ex )->prev=plr; } / Home /if (c==71) { plr-> ex =pla; plr->prev=pla->prev; pla->prev=plr; (plr->prev)-> ex =plr; } re ur (plr); } } while(1); }PL vozvr(PL pla) //Возвращает указатель { //на начало списка pla if (pla== ULL) re ur (pla); while(pla-> ex != ULL) pla=pla-> ex ; re ur (pla); }PL korrek (PL pla) //Управляющие клавиши при работе со списком { spisok(pla); PL deli (PL ); do { swi ch(ge ch()) { / PgUp / case 73:if(pla!= ULL) { if(pla->prev!= ULL)pla=pla->prev;spisok(pla); } break; / PgD / case 81:if(pla!= ULL) { if(pla-> ex != ULL)pla=pla-> ex ;spisok(pla); } break; / Del / case 83:if(pla!= ULL) { pla=deli (pla); spisok(pla); } break; / I s / case 82:pla=vvodspisok(pla); spisok(pla); break; / Esc / case 27:pla=vozvr(pla); re ur (pla); } } while(1); }PL deli (PL pla) //Функция удаления элементов из списка { PL plr= ULL; if(pla->prev!= ULL) { (pla->prev)-> ex =pla-> ex ; plr=pla->prev; } if(pla-> ex != ULL) { (pla-> ex )->prev=pla->prev; plr=pla-> ex ; } free(pla); re ur (plr); }void poisk1(PL pla) //Функция поиска по названиям планет { char s,ch; do { i i=1,l=0; clrscr(); fflush(s di ); pu s(&quo ;Введите интерессующее вас название планеты :&quo ;); ge s(s); pri f(&quo ; Планеты с названием %s : &quo ;,s); pri f(&quo ;│Номер │ Название │ Когда │ Кто открыл │ Кол-во │ &quo ;); pri f(&quo ;│ стр.

│ планеты │ открыли │ планету │ спутников │ &quo ;); while (pla->prev) { if(s rcmpi(pla-> amepl,s)==0) { pri f(&quo ;│ %5d │ %18s │ %12u │ %15s │ %11u │ &quo ;,i,pla-> amepl, pla->year,pla->people,pla->spu ik); l ;i ; } pla=pla->prev; } if (s rcmpi(pla-> amepl,s)==0) { pri f(&quo ;│ %5d │ %18s │ %12u │ %15s │ %11u │ &quo ;,i,pla-> amepl, pla->year,pla->people,pla->spu ik); l ;i ; } pri f(&quo ; Найдено %d планет. &quo ;,l); pu s(&quo ; Поиск по названиям планет завершен. Продолжить?(y- да)&quo ;); fflush(s di ); ch=ge ch(); } while(ch=='y'); }void poisk2(PL pla) //Функция поиска по годам открытия { char ch; do { i i=1,l=0,a,b; clrscr(); fflush(s di ); pu s(&quo ;Введите интерессующее вас границы поиска (от чего- то до чего- то) :&quo ;); while(sca f(&quo ;%d%d&quo ;,&a,&b)!=2) { while (ge char()!=' '); pri f(&quo ;Все- таки стоит здесь что- нибудь ввести (от a до b) &quo ;); } pri f(&quo ; Планеты открытые в таком диапозоне(с %d до %d года): &quo ;,a,b); pri f(&quo ;│Номер │ Название │ Когда │ Кто открыл │ Кол-во │ &quo ;); pri f(&quo ;│ стр. │ планеты │ открыли │ планету │ спутников │ &quo ;); while(pla->prev) { if((ayear)&&(b>=pla->year)) { pri f(&quo ;│ %5d │ %18s │ %12u │ %15s │ %11u │ &quo ;,i,pla-> amepl, pla->year,pla->people,pla->spu ik); l ;i ; } pla=pla->prev; } if((ayear)&&(b>=pla->year)) { pri f(&quo ;│ %5d │ %18s │ %12u │ %15s │ %11u │ &quo ;,i,pla-> amepl, pla->year,pla->people,pla->spu ik); l ;i ; } pri f(&quo ; Найдено %d планет. &quo ;,l); pu s(&quo ; Поиск по годам открытия планет завершен. Продолжить?(y- да)&quo ;); fflush(s di ); ch=ge ch(); } while(ch=='y'); }void klear(PL pla) //Функция очистки памяти { PL plr; if (pla) { if (pla->prev) { plr=pla->prev; while (plr->prev) { free(plr-> ex ); plr=plr->prev; } } else plr=pla; free(plr); } }char f ame() //Функция ввода имени файла { char ; =(char )malloc(80 sizeof(char)); cpri f(&quo ;Введите имя файла: &quo ;); fflush(s di ); sca f(&quo ;%79s&quo ;, ); re ur ; }i save1(PL pla,char file ame) //Функция, сохраняющая данные { FILE fp; if((fp=fope (file ame,&quo ;w&quo ;))== ULL) re ur 0; while(pla) { fpri f(fp,&quo ;%s %d %s %d &quo ;, pla-> amepl,pla->year,pla->people,pla->spu ik); pla=pla->prev; } fclose(fp); re ur 1; }i save(PL pla) //Функция для сохранения данных { char ame; wi dow(1,1,79,25); clrscr(); ame=f ame(); if (save1(pla, ame)==1) re ur 1; cpri f(&quo ; Невозможно произвести запись!!!&quo ;); sove (&quo ;Ошибка!!! Нажмите любую кнопку&quo ;); ge ch(); re ur 0; }PL load(PL pla) //Функция загрузки данных из файла { char c, ame; i i; PL pla = ULL, pla e= ULL; FILE fp; wi dow(1,1,79,25); clrscr(); ame=f ame(); cpri f(&quo ;Осуществлять чтение? (y-Да , -Нет) &quo ;); do c=ge ch(); while((c!='y')&&(c!=' ')); if (c==' ') re ur (pla); if((fp=fope ( ame,&quo ;r &quo ;))== ULL) { klear(pla); cpri f(&quo ; Ошибка при открытии файла!!!&quo ;); sove (&quo ;Ошибка!!! Нажмите любую кнопку&quo ;); ge ch(); re ur ( ULL); } pla e=(PL )malloc(sizeof(PL)); while (fsca f(fp,&quo ;%s %d %s %d &quo ;, { pla e->prev= ULL; pla e-> ex =pla ; if (pla != ULL) pla ->prev=pla e; pla =pla e; pla e=(PL )malloc(sizeof(PL)); } free(pla e); if (pla != ULL) { while(pla -> ex ) pla =pla -> ex ; } fclose(fp); klear(pla); re ur (pla ); } / Функция сортировки по алфавиту / PL sor (PL pla) { PL poi , mp= ULL, f, s; i i,j,srav; //Указатель на начало f=pla; poi =pla; while(f!= ULL) { s=f-> ex ; while(s!= ULL) { if((s rcmp(f-> amepl,s-> amepl)>0)) { mp=(PL )malloc(sizeof(PL)); s rcpy( mp-> amepl,f-> amepl); mp->year=f->year; s rcpy( mp->people,f->people); mp->spu ik,f->spu ik; // s rcpy(f-> amepl,s-> amepl); f->year=s->year; s rcpy(f->people,s->people); f->spu ik=s->spu ik; // s rcpy(s-> amepl, mp-> amepl); s->year= mp->year; s rcpy(s->people, mp->people); s->spu ik= mp->spu ik; free( mp); } s=s-> ex ; } s rcpy(poi -> amepl,f-> amepl); poi ->year=f->year; s rcpy(poi ->people,f->people); poi ->spu ik=f->spu ik; poi =poi -> ex ; f=f-> ex ; } poi =pla; re ur (poi ); }void mai () { char ccc,hhh,ch; i i; PL pla e = ULL; pla e ->prev=pla e -> ex = ULL; se cursor ype( OCURSOR); ex color(10); me u1(); do { do { fflush(s di ); swi ch(ccc=ge ch()) { case '1': { clrscr(); pri f(&quo ; Рекомендации пользователю : &quo ; &quo ;Эта программа- это подобие электронной базы данных.

Программа работает, &quo ; &quo ; используя массивы в памяти ЭВМ для хранения информации введенной пользователем.&quo ; &quo ; Данные могут вводиться с клавиатуры или загружаться из файла.&quo ; &quo ;Также можно вывестина экран всю картотеку или же просматривать картотеку по карточкам,&quo ; &quo ; с возмож- ностью добавления или удаления некоторых карточек по выбору.&quo ; &quo ; Программа имеет хороший интерфейс и показывает устойчивую работу.&quo ; &quo ; В программе имеется поиск элементов по заданным условиям, а также сортировка планет по названиям.&quo ; &quo ; В программе есть главное меню и подменю для поиска планет по некоторым признакам.&quo ; &quo ; Желательно, чтобы данные были точные, корректно записанные и касающиеся&quo ; &quo ; непосредственно темы данной лабораторной работы.&quo ;); pu s(&quo ; Для перехода в главное меню нажмите любую клавишу.&quo ;); ge ch(); me u1(); break; } case '2': { free(pla e ); pla e = ULL; pla e ->prev=pla e -> ex = ULL; clrscr(); pu s(&quo ;Это новая база данных?(да-y/ нет- ) &quo ;); do { fflush(s di );sca f (&quo ;%c&quo ;, &ch); pri f (&quo ; Введите символ(да- y / нет- ) &quo ;); } while (ch!=' ' && ch!='y'&& ch!='Y'&& ch!=' '); if (ch=='y' ch=='Y') { clrscr(); pla e =vvodall(); clrscr(); pu s(&quo ; Записать в файл (да-y/нет- )?&quo ;); do { fflush(s di ); sca f (&quo ;%c&quo ;, &ch); pri f (&quo ;Введите символ(да- y / нет- ) &quo ;); } while (ch!=' ' && ch!='y'&& ch!='Y'&& ch!=' '); if (ch=='Y' ch=='y') { save(pla e ); pu s(&quo ; Запись данных закончена! Нажмите любую клавишу.&quo ;); ge ch(); } } else pla e =load(pla e ); me u1(); co i ue; } case '3': { if(pla e != ULL) { clrscr(); vivodall(pla e ); me u1(); co i ue; } break; } case '4': { free(pla e ); pla e =korrek (pla e ); me u1(); break; } case '5': { if(pla e != ULL) { clrscr(); me u2(); swi ch(hhh=ge ch()) { case '1': { poisk1(pla e ); me u1(); co i ue; } case '2': { poisk2(pla e ); me u1(); co i ue; } defaul : me u1(); } me u1(); co i ue; } break; } case '6': { if(pla e != ULL) { clrscr(); i=5; pu s(&quo ; Идет сортировка по названию планеты.&quo ;); while(i

Вместе с тем по-прежнему далеки от реализации другие прогнозы из того же романа: это и окончательная победа над раком, гриппом и обычным кариесом, и замена умозрительного психоанализа точной наукой – «оперативной психологией» (позволяющей лечить душевные недуги с той же эффективностью, с какой сегодняшняя медицина справляется с телесными), и освоение ближайших планет Солнечной системы. Наступление реального 2001 года вызвало в прессе волну ревизии всего, что прогнозировал Кларк в «2001: космическая одиссея». Среди самых впечатляющих и хотя бы частично воплощенных предсказаний отмечены следующие: космические «челноки», ионный двигатель, орбитальная станция, видеофоны и портативные компьютеры-блокноты (notepads) с функциями электронной почты. «Челноки» давно превратились в обыденную реальность. Ионный двигатель был испытан НАСА в 1998 году при запуске спутника Deep Space One. Находится в стадии строительства и большая орбитальная станция (если ее будущее сегодня и представляется туманным, виной тому проблемы не технические, а финансовые), хотя и поскромнее той, что в фильме

6. Земля как планета Солнечной системы и "колыбель" жизни

7. Развитие планеты Земля после образования Солнечной системы

8. Вселенная, Галактика и Солнечная система

Комплект детского постельного белья "Хоккей".
Постельное белье из бязи выполнено из высококачественного хлопка, что гарантирует крепкий и здоровый сон. Комплект не требует особого
1498 руб
Раздел: Детское, подростковое

Фоторамка "Poster yellow" (70х100 см).
Рамка настенная может располагаться как вертикально, так и горизонтально. Для фотографий размером: 70х100 см. Материал: пластик.
484 руб
Раздел: Размер 50x60 и более

Развивающая игра с карточками "Изучаем время".
Набор с карточками "Изучаем время" - очень увлекательная и полезная для развития малыша игрушка. При помощи неё ребёнок
345 руб
Раздел: Обучающие, игровые

22. Солнечная система

23. Солнечная система

24. Солнечная система

Покрывало "Нордтекс. Цветочный ковер", 150х200 см.
Airsoft - это нежнейшие на ощупь покрывала с двусторонним длинным ворсом. Новая конструкция полотна содержит еще больше воздуха, который
900 руб
Раздел: Покрывала и пледы

Кастрюля из нержавеющей стали 5508-2, 2,1 л, 18 см.
Объем: 2,1 л. Диаметр: 18 см. Глубина: 10,5 см. Толщина стали: 0,3 мм. Кастрюля из высококачественной нержавеющей стали. Специальная
422 руб
Раздел: До 3 литров

Антискользящий резиновый коврик для ванны "Roxy-kids", 35x76 см, салатовый.
Резиновый коврик с отверстиями ROXY-KIDS создан специально для детей и призван обеспечить комфортное и безопасное купание в ванне. Мягкие
529 руб
Раздел: Горки, приспособления для купания

38. Программа регистрации процесса производства для автоматизированной системы управления предприятием электронной промышленности

39. Разработка системы автоматизированного электронного документооборота для предприятия

40. Система автоматизации документооборота. Электронный документ

Тележка для маркета.
Размер тележки: 39x36,5x58 см.
785 руб
Раздел: Магазины, супермаркеты

Игра с прищепками "Зайка".
Собираем яркий и красочный сюжет, проговаривая каждое действие. Малыш будет все повторять за вами, что в результате приведет к
365 руб
Раздел: Прочие

Глобус Земли политический, диаметр 420 мм.
Политический глобус Земли. Диаметр: 420 мм. Масштаб: 1:30000000. Материал подставки: пластик. Цвет подставки: прозрачный. Цвет дуги может
1981 руб
Раздел: Глобусы

54. Мир Галактик (Галактики и звездные системы)

55. Планеты-гиганты

56. Планеты-гиганты

Глобус физический на подставке из пластика диаметром 250 мм.
Диаметр: 250 мм. Масштаб: 1:50000000. Материал подставки: пластик. Цвет подставки: прозрачный. Шар выполнен из толстого пластика, имеет
554 руб
Раздел: Глобусы

Набор для проведения опытов по очистке воды "Юный ученый".
Самый лучший способ познания окружающего мира – увидеть все собственными глазами. Набор для проведения опытов по очистке воды «Юный
403 руб
Раздел: Химические опыты

Маркеры для доски, 12 цветов.
12 разноцветных маркеров для рисования на демонстрационных досках.
605 руб
Раздел: Для досок

70. Военные реформы 1862-74 годов в России. Техническое перевооружение армии и флота, всесословная воинская повинность. Изменение системы военного управления

71. Законодательство Российской Федерации о единой государственной системе предупреждения и ликвидации чрезвычайных ситуаций

72. Світове господарство - глобальна географічна система та економіко-географічний вимір

Подвесные качели "Кассон".
Подвесные детские качели изготовлены из прочного жгута и пластиковых разноцветных деталей. Размер: 48х48х24 см. Материал:
394 руб
Раздел: Качели

Подгузники-трусики для мальчиков Huggies DryNights, 8-15 лет, 9 штук.
Деликатная защита на всю ночь для детей от 4х лет, страдающих энурезом. Одноразовые Трусики Хаггис Драйнайтс для мальчиков 8-15 лет (30-57
468 руб
Раздел: Обычные

Глобус "Двойная карта" рельефный, с подсветкой, на подставке из пластика.
Диаметр: 250 мм. Масштаб: 1:50000000. Материал подставки: пластик. Цвет подставки: прозрачный. Мощность: 220 V, переключатель на шнуре;
1072 руб
Раздел: Глобусы

86. Система таможенных органов РФ

87. Расходы бюджетной системы на социальные цели

88. Налоговые системы развитых стран и их сравнение с налоговой системой России

Кроватка-качалка для куклы.
Красивая и удобная кровать-качалка станет прекрасной колыбелькой для куклы. Кровать-качалка прекрасно дополнит интерьер кукольной комнаты
386 руб
Раздел: Спальни, кроватки

Простыня трикотажная на резинке, 90х200х25 см, цвет шоколад.
Трикотажные простыни и наволочки – это идеальный вариант постельных принадлежностей, создающий атмосферу уюта и гармонии в спальне,
678 руб
Раздел: Простыни, пододеяльники

Нож для чистки овощей "Victorinox", универсальный, двустороннее зубчатое лезвие, чёрный.
Изумительный нож для кухни. Небольшой и удобный, он идеально подходит для чистки овощей. А яркий цвет порадует глаз и не даст ножу
410 руб
Раздел: Овощечистки, рыбочистки