В середине 60-х годов осознали, что в области организационного управления данные, или информация, относятся к важнейшим ресурсам любой организаии, деятельность

Скачать 356.86 Kb.

Название	В середине 60-х годов осознали, что в области организационного управления данные, или информация, относятся к важнейшим ресурсам любой организаии, деятельность
страница	5/7
Тип	Документы

1 2 3 4 5 6 7

STORE 5 ,11 TO PM1, РМ2

PM3 = 75

РМ4=3586

STORE «Маша», «мыла», «раму» TO SM1,SM2,SM3

A=TRUE

B=FALSE
1. Просмотреть переменные памяти на экране.

DISP MEMO

2.С помощью команды ? вывести на экран надпись :

Маша мыла раму

? SM1,SM2,SM3

3.Вычислить,пользуясь командой ? ,сколько будет:

3586:11

? РМ4 / РМ2

4.Удалить переменную PM3.

RELEASE PM3

5.Удалить переменные,имеюшие имена на букву S.

RELEASE ALL LIKE S*

6. Записать оставшиеся переменные на диск:

Формат команды:

SAVE TO < файл .mem> [ALL LIKE < шабл. >

/EXCEPT< шабл. >]

SAVE TO PERPAM ALL LIKE .

7.Удалить переменные , записанные на диск (п.7) из оперативной памяти:

RELEASE ALL

9.Создать переменную памяти , содержащую значение:

“ВЕСНА !!!”

STORE “ВЕСНА!!!” TO WES

10.Считать переменные с диска , не потеряв только что созданную:

RESTORE FROM PERPAM.mem ADDITIVE

Выполнить самостоятельно

1.Даны символьные переменные памяти А1 и В1:

А1= «На дворе трава, на траве дрова»

В1= «» {пустая переменная}

Переставить слова скороговорки из А1 в обратном порядке,
поместив результат в В1.Для работы понадобиться функция:
SUBSTR(<выр С>,<нач. позиция>,[<число символов>]) ––
выделение из <выр С> подстроки, начиная с <нач. позиции>
длиной в <число символов>.
Контрольные вопросы:

1.Что такое –– переменная памяти ?

2.Смысл знака = в математике и в программировании ?

3.Ограничения на переменные : максимальная длина одной переменной, и максимальное число переменных?
Лабораторная работа №5 (часть II ) Работа с полями БД.

Цель:посмотреть использование команды ? для просмотра записей базы,

познакомиться с командами математической обработки БД –– SUM и COUNT.

1. Просмотреть записи с помощью команды -? .

а) вывести на экран поля , содержащие фамилию ,город , и специальность из первой записи в БД

GO TOP

? FAMIL,GOROD,SPEC

б ) вывести поля фамилии и возраста из 5 – ой записи

GO 5

? FAMIL,WOZR
Автоматический подсчет записей –– команда COUNT:

С форматом команды COUNT ознакомьтесь,прочитав справочную информацию (в компьютере).

1. Подсчитать количество слушателей прибывших из Москвы.

COUNT FOR GOROD=”Москва”

2. Пометить на удаление записи о слушателях десятидневных курсов.

DELETE ALL FOR LONG=10

3. Подсчитать общее число слушателей курсов вместе с десятидневными (режим SET DELETED OFF) и поместить рез-ат в перем. Памяти WSE.

SET DELETED OFF

COUNT TO WSE

4.Подсчитать общее число слушателей курсов без учета помеченных на удаление ( режим SET DELETED ON ).

SET DELETED ON

COUNT TO ONDEL

5. Подсчитать количество слушателей мужского пола до 30-ти лет и занести результат в переменную памяти под именем МР30.

COUNT FOR POL=”м” .AND. WOZR<=30 TO MP30

Суммирование полей записей –– SUM:

Формат команды SUM посмотрите в Help на компьютере.

1. Подсчитать плату , внесённую всеми слушателями курсов и поместить её в переменную памяти.

SUMMA=000000.00

SUM PLATA TO SUMMA

2. Подсчитать плату , внесённую слушателями десятидневных курсов.

SUM PLATA FOR LONG=10
Выполнить самостоятельно

1. Подсчитать количество слушателей москвичей,знающих иностранный язык.

2.Подсчитать сумму, внесённую слушателями 45-ти дневных курсов, при-
бывших из Читы.
Контрольные вопросы:

1.Чем отличаются команды ? и ??

2.Для чего ещё служит команда ? , кроме вывода содержимого полей БД, символьных констант и переменных памяти на экран?

3. Как изменяет работу команд режим SET DELETED ON/OFF?
Лабораторная работа № 6.Стандартные функции FoxPro.

Цель:Познакомиться со стандартными функциями FoxPro.

В FoxPro создано большое количество стандартных функций, обращение к которым существенно облегчает работу прграммиста. Они используются для анализа или преобразования данных.Синтаксис функции предполагает обязательное наличие скобок, даже если отсутствует параметр. Например, функция –– EOF(),проверяет – достигнут или нет конец файла базы.Все функции можно подразделить по их работе на:

Математические,

Функции работы с БД,

Функции работы с датой,

Функции работы со строками,

Функции преобразования типов данных,

Функции проверки файлов и дисков,

Функции позиционирования выдачи данных,

Функции работы с мышью,

Клавишные функции,

Функция макроподстановки и некоторые другие.

Ниже даны описание и примеры работы некоторых функций. Результаты выполнения приведены справа после знаков && –– комментария.

Функция преобразования числового <вырN> в символьную строку, включающую знак минус (если есть) и десятичную точку, общей длиной <длина>, c заданным количеством <десятичных знаков>.Если <длина> не указана, берётся длина 10.Если не указаны <десятичные знаки>, число округляется до целого значения, и вообще в случае уменьшения длины дробной части оно округляется.

STR(<вырN>,[<длина>],[<десятичные знаки>])

Пример:

? STR(278.985,8,2) && 278.99

Функция определения длины строки. Длина нулевой строки (‘’) равна нулю.

LEN(<выр С>)

Пример:

? LEN(‘математика’) && 10

Функция преобразования выражения типа дата в символьное .

DTOC(<вырD>[,1])

Необязательный параметр “1” означает,что формируемая строка будет не символьным отображением даты в каком – либо формате даты, а сплошной строчкой из четырёх цифр года, двух цифр месяца и дня – ГГГГММДД.Такое изображение даты удобно при индексировании с составным ключом, в котором есть дата.

Пример

? DTOC({05.10.91}) && 05.10.91

? DTOC({05.10.91},1) && 19911005

Функция выдаёт ASCII - код первого символа из символьного выражения.

ASC(вырC)

Пример:

? ASC(“Воробей”) && 66

? ASC(“A”) && 65

Функция определения достижения начала базы данных в текущей или указанной области.

BOF([<область>])

Функция принимает значение .Т., когда указатель записи пытаются перевести с первой записи за пределы базы.
Выполнить самостоятельно

1.Пользуясь справочной информацией (в компьютере) в FoxPro изучить необходимые в дальнейшей работе функции преобразования типов данных, работы с датами, строковые функции, функции проверки файлов и дисков.

2. Перекодировать слово ЛЕВ в КИТ, пользуясь функциями SUBSTR(),ASC(),STR() и таблицей ASCII – кодов. Вывести исходное слово и результат перекодировки на экран.

Контрольные вопросы:

1.Что является обязательным в синтаксисе функций?

2. Приведите примеры функций без параметров.

Лабораторная работа № 7. Команды ввода – вывода.

Цель:познакомиться с командами ввода – вывода :

Команда INPUT;

Форматированный ввод-вывод –– @ X,Y,SAY … GET …

Команда INPUT служит для ввода данных с клавиатуры.

Формат команды:

INPUT<подсказка> TO <перем.пам.> .

1.Выведите сообщение - подсказку: "Введите стоим. одного академ. часа занятий алгеброй" и примите эту цифру в переменную памяти STOIM .

INPUT <Введите стоим. одного академ. часа занятий алгеброй> TO STOIM

При вводе данных следует набрать: 35

2. Выведите сообщение :"Ваше любимое имя" и введите ответ в переменную памяти NAME:

INPUT <Ваше любимое имя> TO NAME

При вводе данных следует набрать, допустим, “Люся”
Работа с командой форматированного ввода – вывода:
@ X,Y SAY <симв.выр.> GET <перем. пам.>,

здесь X и Y –– координаты экрана.
Вывести на экран сообщение :”Введите ваше имя” и принять введенное имя в переменную памяти IMYA.

IMYA=SPACE(8)

@ 5,10 SAY “Введите Ваше имя” GET IMYA

READ

Переменная памяти, в которую осуществляется ввод по команде GET , должна быть ранее объявлена в программе. Для активизации ввода после GET всегда должна следовать команда READ.

Пример

Выведите на экран содержимое полей последней записи в БД KOLLEK.DBF, воспользовавшись командой форматированного ввода-вывода, и дополните БД одной записью, заполнив её данными с помощью той же команды.

CLEAR

USE KOLLEK

GO BOTTOM

@ 5,10 SAY “Фамилия” + FAMIL

@ 5,30 SAY “Город” + GOROD

@ 7,10 SAY “Специальность” + SPEC

@ 7,30 SAY “Плата” + STR(PLATA)

@ 9,10 SAY “Возраст” + STR(WOZR)

@ 11,30 SAY “Пол” + POL

@ 13,10 SAY “Знание ин. языка” + IIF ( INJAZ, “T”, “F”)

@ 15,30 SAY “Продолжительность курсов” + STR(LONG)

WAIT

APPEND BLANK

CLEAR

@ 3,10 SAY “Введите следующие данные в запись:”

@ 5,10 SAY “Фамилия” GET FAMIL

@ 7,10 SAY “Город” GET GOROD

@ 9,10 SAY “Специальность” GET SPEC

@ 11,10 SAY “Плата за курсы” GET PLATA

@ 13,10 SAY “Возраст” GET WOZR

@ 15,10 SAY “Пол” GET POL

@ 17,10 SAY “Знание ин. языка” GET INJAZ

@ 19,10 SAY “Продолжит. Курсов в днях” GET LONG

READ
Выполнить самостоятельно:

Написать программу –– игра с компьютером в отгадывание загадок.

Для этого создать базу данных, записи которой состоят из двух полей: загадка и отгадка. Используя команду форматированного ввода-вывода организовать диалог компьютера с играющим: компьютер знакомится с играющим, выводит загадку и просит ввести ответ. Следует пояснить играющему в каком виде вводить ответ. Ответ следует сравнить с хранящимся в базе и сообщить – правилно отгадано или нет.
В случае неверного ответа предложить ещё одну попытку, и в любом
случае выводить для отгадывания следующую загадку. В счётчике подсчитывать количество отгаданных загадок, и выдать эту информацию на экран по окончании игры.
Контрольные вопросы:

1.Каковы могут быть значения координат X и Y в команде форматированного ввода-вывода? (Сколько на экране строк и столбцов?)

2.Возможно ли употребить команду GET в виде:

@ X,Y GET <имя перем. пам.>

Проверьте.