Тип данных String в Pascal.

Со строковыми переменными можно производить различные операции. Операция сцепления строк позволяет соеденить 2 строки между собой.

Умножение, деление, сложение, вычитание вещественных чисел в Pascal.

С вещественными числами можно производить операции умножения, сложения, вычитания, а также операцию деления. Причем операция деления отличается от операции Div. Деление вещественных чисел - это обычное математическое деление, в результате которого ...

Ветвления в Pascal.

Ветвления в Паскаль позволяют выполнять действия не поочередно, как мы делали в предыдущих программах, а в зависимости от каких - либо условий. Для этого в языке программирования Pascal предусмотрены различные условные операторы. В данном уроке мы ...

Циклы и массивы

ЗАПИСИ. ТИП ДАННЫХ RECORD.

В описании данных и связей между ними используют понятия: запись логическая и запись физическая. Физическое описание данных определяет способ их хранения во внешней памяти ЭВМ. Логическое описание ...

Спецификация процедуры.

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

Постановка задачи: Необходимо определить функцию для проверки делится ли целое число на каждую из его цифр без остатка. Напечатать такие числа в интервале от 10 до 1000.

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

Метод решения задачи: Для решения задачи необходимо использовать основной цикл типа FOR..TO..DO который будет проверять все значения ОДЗ по следующему принципу: в переменную k возвращается остаток числа от деления его на 10, проверяется условие деления числа на этот остаток, если деление производится без остатка то данное число удовлетворяет условию, число выводится на экран и т.д.

Алгоритм решения задачи:

1.Выполняется тело цикла, содержащее, необходимые условия; 2.Вывод результатов.

Описание структур данных, использованных в алгоритме:

flag – переменная булевского типа, используется для хранения информации о том подходит ли число условию или нет.

i– счетчик цикла; изменяется под управлением оператора цикла.

x, k – вспомогательные, промежуточные переменные..

Программа и методика испытания:

 uses crt;
var i,k,x:integer;
flag:boolean; begin clrscr;
writeln('Определить функцию для проверки делится ли число на каждую из своих');
writeln('цифр без остатка. Напечатать такие числа в интервале от 10 до 1000');
writeln;
writeln('Искомые числа:');
for i:= 10 to 1000 do
begin
flag:=true;
k:=i;
while k > 0 do
  begin x:=k
   mod 10;
       if x <> 0 then
     begin if (i mod x) <> 0 then
        flag:=false
     end else
           flag:=false;
       k:=k div 10;
     end;
  if flag then write(i:5);
     end;
writeln;
writeln('Нажмите любую клавишу для выхода.');
readkey;
end. 

Данный алгоритм представлен циклической структурой с внутрицикловыми ветвлениями. Для ведения бухгалтерсой и налоговой отчетности Вам поможет программа для бухгалтерского учета, при помощи которой можно легко оформлять бухгалтерские документы и многое другое. Во время проведения испытаний разработанной программы следует проверить правильность задания граничных значений для параметра цикла, правильность (соответствие поставленной задаче) тела цикла, правильность начальных условий для операторов тела цикла.

Предыдущая статья : Дана матрица A размером KxM. Получить транспонированную матрицу A* и произведение AxA*.

Оглавление : Уроки Паскаль. Массивы.

Добавить комментарий

Защитный код
Обновить

   ГлавнаяПаскальПримеры программ.