Пример 1

Вывести на экран терминала числа от 0 до 9 в один столбик.

Решение

Так как числа должны выводиться в столбик, воспользуемся для их вывода процедурой WRITELN:

{ВЫВОД ЧИСЕЛ ОТ 0 ДО 9 В СТОЛБИК}

begin

Writeln(0);

Writeln(1);

Writeln(2);

Writeln(3);

Writeln(4);

Writeln(5);

Writeln(6);

Writeln(7);

Writeln(8);

Writeln(9)

end.

В этой задаче требовалось вывести десять чисел в столбик. Для этого мы воспользовались десятью процедурами WRITELN. А если бы от нас потребовали вывести пятьдесят чисел, например от 21 до 70? Неужели бы нам пришлось писать пятьдесят процедур WRITELN?! Конечно же нет, язык PASCAL дает нам возможность с помощью оператора цикла и всего лишь одной процедуры WRITELN вывести столько чисел, сколько нам надо. Как же это сделать? В нашей программе процедура вывода выполнялась десять раз, изменялась лишь выводимая информация. Давайте посмотрим, есть ли какая-то закономерность в этом изменении. Конечно, есть. Числа в скобках изменяются от 0 до 9 с шагом 1. То есть мы можем записать так:

процедуру WRITELN(i) надо выполнить 10 раз

при i, изменяющейся от 0 до 9 с шагом 1.

Перевернем немного эту фразу:

для i, изменяющейся от 0 до 9 с шагом 1,

выполнять процедуру WRITELN(i);

- и запишем ее на языке PASCAL:

FOR i:=0 TO 9 DO

WRITELN(i)

Запишем программу полностью. У нас появилась переменная i. Ее надо описать. Эта переменная целого типа.

{ВЫВОД ЧИСЕЛ ОТ 0 ДО 9 В СТОЛБИК}

var

i:integer;

begin

FOR i:=0 TO 9 DO

WRITELN(i)

end.

Как видите в приведенном выше примере, заголовок цикла записывается на одной строке, тело цикла – на другой со сдвигом на 2-3 символа.

ЗАДАНИЯ

№1. Вывести на экран прописные буквы латинского алфавита от 'A' до 'Z'.

№2. Вывести на экран все целые числа от 40 до 20 в порядке убывания и от -100 до 10 в порядке возрастания.

Массив - это упорядоченная совокупность переменных, называемых элементами массива.

Массивами являются матрицы и вектора, известные из области математики.

Каждый массив имеет имя, размерность и определенную длину. Например, массивы X и Y, содержащие координаты точек на плоскости

одномерные, длина каждого из них равна четырем.

Объединим эти векторы в один массив:

Дата добавления: 2014-12-27