Узнать стоимость написания работы
Оставьте заявку, и в течение 5 минут на почту вам станут поступать предложения!
Реферат

Реферат по предмету "Программирование, программное обеспечение, СУБД"


Зачет по ТУРБО ПАСКАЛЮ 7.0

Зачётная работа по ПОЭВМ Выполнил: Введите своё имя. Задание. Компания хочет передавать данные по телефону, но она
обеспокоена возможностью телефонного перехвата. Все передаваемые данные являются четырехзначными целыми числами. Компания попросила вас написать программу, которая должна шифровать эти данные так, чтобы они могли передаваться с большой безопасностью. Ваша программа должна читать целые четырехзначные числа и шифровать их следующим образом: заменять каждую цифру значение остатка от деления: (сумма этой цифры плюс 7) / 10. Затем менять местами первую цифру с третьей и второую четвертой. Затем печатать полученное зашифрованное число. Напишите отдельную программу, которая вводила бы зашифрованные четырехзначные целые и дещифровала их, получая исходные числа. Программа шифрования чисел. Uses CRT; Var ne: string; {не кодированное число} ko: string; {это закодированное число} r: string; {строковые} i: integer; {числовые} per: integer; {чтобы перевести строковые в числовые} Begin Clrscr;
Writeln('Введите четырехзначное число которое хотити зашифровать'); Readln(ne); x: =copy(ne, 1, 1); val(r, i, per); i: =(i+7) mod 10; str(i, r); insert(r, ko, 3); x: =copy(ne, 2, 1); val(r, i, per); y: =(i+7) mod 10; str(i, r); insert(r, ko, 4); x: =copy(ne, 3, 1); val(r, i, per); y: =(i+7) mod 10; str(i, r); insert(r, ko, 1); x: =copy(ne, 4, 1); val(r, i, per); y: =(i+7) mod 10; str(i, r); insert(r, ko, 2); Write('Введенное вами число зашифровано: '); Write(ko); Readln; End. Подготовил RASIK Моя почта: rasik@nptus. ru или rasik@bzz. ru Моя страница: www. rasik. by. ru Пишите мне и заходите ко мне на сайт буду всем рад!


Не сдавайте скачаную работу преподавателю!
Данный реферат Вы можете использовать для подготовки курсовых проектов.

Поделись с друзьями, за репост + 100 мильонов к студенческой карме :

Пишем реферат самостоятельно:
! Как писать рефераты
Практические рекомендации по написанию студенческих рефератов.
! План реферата Краткий список разделов, отражающий структура и порядок работы над будующим рефератом.
! Введение реферата Вводная часть работы, в которой отражается цель и обозначается список задач.
! Заключение реферата В заключении подводятся итоги, описывается была ли достигнута поставленная цель, каковы результаты.
! Оформление рефератов Методические рекомендации по грамотному оформлению работы по ГОСТ.

Читайте также:
Виды рефератов Какими бывают рефераты по своему назначению и структуре.

Сейчас смотрят :

Реферат «Комплексні підходи до розвитку сільских територій. Кооперація І партнерство»
Реферат Изготовление детали "Вал ступенчатый"
Реферат Лекции - терапия (кардиомипатии)
Реферат МЕХАНІЗМИ ІНАКТИВАЦІЇ ПОТЕНЦІАЛ-ЗАЛЕЖНИХ К КАНАЛІВ 2
Реферат "Хитрые" члены предложения (об уточнении, присоединении и пояснении)
Реферат Экономические взгляды Джона Мейнарда Кейнса
Реферат Обоснование социальной работы с безнадзорными детьми из приюта
Реферат Історія гончарства
Реферат Краткое содержание Атала Франсуа Рене Огюст де Шатобриан
Реферат Аудиторская проверка учета денежных средств на материалах ЗАО Тбилисский маслосырзавод
Реферат Философия сестринского дела
Реферат Регресс в эволюции многоклеточных животных
Реферат Средства и способы борьбы с пылью на горных предприятиях
Реферат Internet Cops Essay Research Paper Computer Internet
Реферат Envy Essay Research Paper Visiting a waterfall