Оцените презентацию от 1 до 5 баллов!
Тип файла:
ppt / pptx (powerpoint)
Всего слайдов:
24 слайда
Для класса:
1,2,3,4,5,6,7,8,9,10,11
Размер файла:
160.00 kB
Просмотров:
83
Скачиваний:
0
Автор:
неизвестен
Слайды и текст к этой презентации:
№1 слайд
Содержание слайда: Повторение действий в turbo pascal.
Циклы
№2 слайд
Содержание слайда: Типы циклов
цикл с предусловием
цикл с постусловием
цикл с параметром
№3 слайд
Содержание слайда: Основные понятия
Тело цикла –
повторяющиеся действия
Итерация –
один проход цикла
Начальные установки –
определение значений переменных, которые используются в циклах с предусловием и с постусловием
№4 слайд
Содержание слайда: Цикл с предусловием
№5 слайд
Содержание слайда: Примеры
a : = 3; while a < 4 do a: = sqr(a);
a : = 10; while true do a : = a*10;
a : = 10; while false do a : = a*10;
№6 слайд
Содержание слайда: Задача
Преобразовать значение угла в градусах к стандартному диапазону ±1800 путем исключения полных оборотов окружности (±3600).
№7 слайд
Содержание слайда: Решение
var a : integer;
begin
readln(a);
while abs(a) > 180 do
if a > 0 then dec(a,360)
else inc(a,360);
writeln(a);
end.
№8 слайд
Содержание слайда: Для n>=0, не применяя формулы, вычислить сумму чисел от 1 до n
№9 слайд
Содержание слайда: C клавиатуры вводятся натуральные числа. Последовательность этих чисел заканчивается нулем. Найти их сумму.
№10 слайд
Содержание слайда: Цикл с постусловием
№11 слайд
Содержание слайда: Примеры
x : = 4;
repeat writeln (x);
until true;
x : = 4;
repeat writeln (x);
until false;
№12 слайд
Содержание слайда: Задача
Найти методом подбора целочисленное решение Диофантова уравнения 5х-3у=1.
№13 слайд
Содержание слайда: Решение
var x, y : integer;
begin
x : = 1; y : = 1;
repeat
if 5*x – 3*y >1 then inc(y)
else inc(x);
until 5*x – 3*y =1;
writeln (x:5, y:5);
end.
№14 слайд
Содержание слайда: Цикл с параметром
Этот оператор применяется, если требуется выполнить тело цикла заранее заданное количество раз.
Параметр - переменная порядкового типа - на каждой итерации увеличивается или уменьшается на одно значение.
№15 слайд
Содержание слайда: Формат оператора
for <параметр> : = <выражение 1>
to <выражение 2> do
<тело цикла>;
S:=0;
for i:=1 to 20 do
s:=s+i;
№16 слайд
№17 слайд
№18 слайд
Содержание слайда: Формат оператора
for <параметр> : = <выражение 1> downto <выражение 2> do
<тело цикла>;
S:=0;
for i:=20 downto 1 do
s:=s+i;
№19 слайд
№20 слайд
Содержание слайда: Задача
Найти нечетные и кратные 3 числа в диапазоне от 30 до 60. Распечатать их в порядке убывания.
№21 слайд
Содержание слайда: Решение
var i : byte;
begin
for i := 60 downto 30 do
if ( i mod 3 =0) and ( odd i )
then writeln ( i );
end.
№22 слайд
Содержание слайда: Замечания
Если тело цикла содержит несколько действий, то эти действия заключаются в операторные скобки begin … end.
В теле цикла запрещается явное преобразование счетчика.
После нормального завершения цикла значение счетчика не определено.
№23 слайд
Содержание слайда: Замечания
Для аварийного выхода из циклов или внеочередного перехода к следующей итерации существуют две процедуры модуля SYSTEM:
BREAK - прекращает выполнение тела цикла и переходит к оператору, следующему за циклом;
CONTINUE – передает управление на условие продолжения или завершения тела цикла, так что начинается следующая итерация.
№24 слайд
Содержание слайда: Общие рекомендации
Используйте цикл с параметром, когда знаете, сколько раз должно выполняться тело цикла;
Используйте цикл с постусловием, если необходимо, чтобы тело цикла выполнилось хотя бы один раз;
Используйте цикл с предусловием, если хотите, чтобы проверка была произведена прежде, чем выполнится тело цикла.