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

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

GotoXY в Pascal.

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

Функции LENGTH и CONCAT.

Функция Length возвращает в качестве значения длину строки. Например, если в строковой переменной «stroka» записано слово «Pascal», то Length(stroka) будет равно 6. Эта операция аналогична операции Ord(stroka[0]), которую мы разбирали в 1-м уроке. ...

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

Структурное программирование

Самое главное в программировании - это научиться писать четкие, логические и структурированные программы.

• Используйте осмысленные имена для переменных, процедур и функций.

• Используйте отступы ...

Примеры линейных программ.

В данной статье приводится несколько примеров линейных программ на языке программирования Паскаль.

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

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

Использование цикла For..to.


program ciklih1;
uses crt;
var N:integer;
begin
clrscr;
For N:=1 To 10 Do
writeln (sqr(N));
readln
end.

Строка №3. Записываем переменну «N». Она будет использоваться в качестве счетчика цикла. Практически во всех программах, использующих цикл For применяется счетчик цикла

В строке №6 записываем цикл For..To..Do. Счетчик цикла «N» показывает сколько раз должен быть выполнен цикл. В нашем примере счетчик будет принимать 10 различных значений от 1 до 10. Соответственно, цикл будет выполнен 10 раз. После слова Do записываются операторы, которые должны выполниться 10 раз при разных значениях счетчика. В нашем примере за словом Do идет оператор вывода на экран Writeln, который выводит на экран квадрат переменной «N» (т.е. счетчика цикла).

В строке №7 выводим квадрат переменной «N» на экран. Благодаря циклу For квадрат переменной  будет выведен 10 раз. Сначала для числа 1, затем для 2, затем для 3 и т.д. до 10.
ciklih v pascal

ciklih v pascal.

В примере переменная «N» является счетчиком цикла. В операторе For указывается начальное значение счетчика «1» и конечное значение «10». Причем не обязательно, чтобы начально значение было равно 1. Можно поставить 2 или 3 или 4 и т.д. Соответственно, квадраты чисел будут выводиться, начиная с 2, 3 или 4. Следует также скажать, что счетчик цикла может увеличиваться только на 1.


Форма записи For N:=1 To 10 Do увеличивает счетчик на еденицу. Если вместо To записать DownTo, то это будет форма записи, которая уменьшает счетчик на еденицу.
Напишем программу, которая будет выводить на экран кубы чисел от 10 до 5

Использование For..To..Downto.


program ciklih2;
uses crt;
var N: integer;
begin
clrscr;
For N:=10 Downto 5 Do
writeln (N*N*N);
readln
end.

В строке №6 записываем цикл For. Однако, в отличии от предыдущего примера, здесь вместо «To» употребляется «Downto». Поэтому действие, которое стоит после слова Do (строка №7) будет выполнено 5 раз в порядке уменьшения переменной «N». Т.е. сначала выведется 10 в кубе, затем 9 в кубе, затем 8 в кубе и т.д. до 5 в кубе.

ciklih v pascal..

ciklih v pascal...


Предыдущая статья : Оператор выбора Case Of в Pascal.

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

Следующая статья : Оператор цикла While..Do.


Комментарии  

 
+4 # Кирито 27.11.2012 15:24
при вознесеии в куб можно было использовать
writeln(power(3 ,N));
 
 
-7 # Нео 16.12.2012 14:35
Ты напомнил мне Power в Excel 8)
 
 
+3 # Антон 23.02.2013 16:59
Поправочка: power(N, 3)
 
 
-5 # anonim 15.12.2012 14:19
:o :o :o :o :o :o :o :o :o :o :o
 
 
-6 # anonim 15.12.2012 14:20
;-) 8)
 
 
+2 # Программм 10.02.2013 14:55
Спасибо)
 
 
+1 # Никит 21.07.2014 14:56
и во второй задаче не пять раз, а шесть
распространенная арифметическая ошибка
 
 
-2 # Bahr 25.12.2015 18:45
Следует также скажать, что счетчик цикла может увеличиваться только на 1.

скажать
админ у вас опечатка :D :D :D
 
 
-1 # лул 17.11.2017 06:46
Прикольно :D :lol: :lol: :lol: :lol: :D :D :D :D :lol:
 
   ГлавнаяПаскальЦиклы в ПаскальЦиклы в Pascal.