Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Pascal_учебник_3.doc
Скачиваний:
33
Добавлен:
11.04.2015
Размер:
937.47 Кб
Скачать

Задания

№3. Описать одномерный целочисленный массив R, первым элементом которого является R1, а последним - R28.

№4. Описать одномерный символьный массив Z, первым элементом которого является Z5, а последним - Z136.

№5. Описать двухмерный массив Y, содержащий элементы вещественного типа, в котором пять строк и семь столбцов.

№6. Дан одномерный массив C длиной 15 элементов. Получить массив D, причем

№7. Какие из приведенных заголовков циклов не содержат ошибок?

a) for j:=10 to 2 do

б) for v:=-7 to 0 do

в) for m[i]:=4 downto 0 do

г) for w:=5 to 20 step 2 do

д) for m:=14 downto k[4] do

№8. Определить значение переменной S после выполнения следующих операторов:

S:=1.0;

n:=1;

for i:= 2 to n do s:=s+1/i; s:=s-1;

№9. Перепишите следующую программу и подчеркните все ошибочные места. Укажите общее количество ошибок в данной программе.

Const

m=10;

Var

ch : char;

k : real;

i,n : integer;

a : array [1...n] of integer;

b,c : array [1...m] of integer;

i: array [1...i] of real;

Begin

Readln(n);

Read(A);

for ch:=0 to 9 do

write(ch);

for k=1 to m do

Read(B[k]);

Read(c[k]);

for i:=n to 1 do

a(i)=b(i)+c(i);

b(i)=c;

inc(i);

c(i)=c(i)*c(i);

a:=b;

b:=c;

a:=i;

c:=b+5;

Writeln(a,b);

for i:= 1 to n do

Writeln(Ci)

End.

Пример 4

Представить в виде структурной схемы (два варианта) следующий цикл:

for k:=5 to 20 do

A[k]:=B[k]-1

Решение

1-й вариант

Впервом варианте схемы отобразим, как наш цикл будет работать по шагам.

Сначала присваивается первоначальное значение параметру цикла.

Затем проверяется условие работы цикла: должно ли при данном значении параметра цикла выполняться тело цикла?

Если условие истинно, то будет выполняться тело цикла при текущем значении параметра цикла. Здесь мы и записали тело цикла. Оно состоит из одного блока (оператора).

Потом увеличиваем значение параметра цик­ла на шаг, равный единице, и осуществляем переход на начало цикла для того, чтобы проверить, нужно ли при полученном зна­чении К вычислять тело цикла. Если К станет больше 20, то мы выйдем из цикла на оператор, следующий за оператором цикла.

2-й вариант

Для записи второго варианта используем блок «МОДИФИКАЦИЯ». Этот вариант более прост в записи, но зато, не совсем будет понятно как работает оператор цикла с параметром языка PASCAL.

В этом блоке мы записали, как изменя­ется значение параметра цикла: от 5 до 20 с шагом 1. Если шаг равен 1, то его опускают вместе с запятой, стоящей перед ним.

Оба варианта записи схемы приемлемы, поэтому Вы можете пользоваться любым из них.

Задания

№10. Представить в виде структурной схемы (2 варианта) следующий цикл:

for L:=2 to 17 do

begin

k:=L+1;

A[k]:=B[L]

end

№11. Представить следующие схемы в виде фрагментов программ (с использованием оператора цикла с параметром):

1)

2)

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]