Разработка и реализация программ с циклической структурой, страница 3

Еще пример. В результате выполнения следующего оператора: for Ch:=’z’ downto ’a’ do Writeln (Ch) будут напечатаны малые буквы английского алфавита в обратном порядке.

Язык Turbo Pascal 7.0 дополнен двумя стандартными процедурами без параметров break и continue, семантика которых полностью совпадает с аналогичными операторами языка С.

Процедура break, приостанавливает выполнение оператора цикла, из которого была вызвана эта процедура. Управление передаётся на оператор, который стоит сразу за оператором цикла.

Процедура continue приостанавливает выполнение поточной итерации оператора цикла, в котором была вызвана эта процедура, и совершает переход к выполнению следующей итерации.

Задание 3.1.

Представить математическую запись фрагмента программы и вычислить значение переменной Х после его выполнения.

Фрагмент программы.

X:=1;

while X<=19 do

X:=X+1;

X:=2*X

Математическая запись.

Этот фрагмент программы реализует вычисление удвоеной суммы двадцати единиц.

Результат. Х=40.

Задание 3.2.

Составить программу табулирования функции при изменении значения х от –1 до 1 с шагом 0,2.

. cosx¹0, x>0, x¹1.

Блок – схема.

С циклом for

n=Trunc((b-a)/h)+1

 

x=a+i*h