Презентация, доклад по информатике на тему Цикл WHILE

Цикл с предусловием используется, когда число повторений неизвестноWHILE условие DO действие; // тело цикла Тело цикла выполняется пока условие ИСТИННО.

Слайд 1Цикл WHILE

Цикл WHILE

Слайд 2Цикл с предусловием используется, когда число повторений неизвестно
WHILE условие DO действие;

// тело цикла
Тело цикла выполняется пока условие ИСТИННО.
Цикл с предусловием используется, когда число повторений неизвестноWHILE условие DO действие; // тело цикла Тело цикла выполняется

Слайд 3Если в теле цикла действий несколько — используются операторные скобки begin …

end;

WHILE условие do
begin
действие_1;
действие_2;
действие_3;
...
end;
Если в теле цикла действий несколько — используются операторные скобки begin … end;WHILE условие do begin действие_1; действие_2;действие_3;

Слайд 4Пример:
Требуется на экране вывести:
Привет Привет Привет Привет

Для реализации данного примера с помощью цикла с

предусловием нам потребуется переменная n:
WHILE n<4 do writeln('Привет');
Пример:Требуется на экране вывести:Привет Привет Привет ПриветДля реализации данного примера с помощью цикла с предусловием нам потребуется

Слайд 5Данный цикл будет выполнять команду writeln(‘Привет’) бесконечное число раз.
Потому что переменная n не изменяется

и всегда будет меньше 4. Поэтому необходимо в цикле добавить код, изменяющий переменную n. Например: n:=n+1.
WHILE n<4 do begin writeln('Привет'); n:=n+1; end; Теперь переменная n будет изменяться с каждым выполнением команд тела цикла (с каждой итерацией).
Нужно запомнить: чтобы не произошло зацикливание в цикле WHILE — необходимо проследить за тем, чтобы переменная из условия изменялась в теле цикла
Данный цикл будет выполнять команду writeln(‘Привет’) бесконечное число раз. Потому что переменная n не изменяется и всегда будет меньше 4. Поэтому

Слайд 6Задача 1.
Считать сумму введенных с клавиатуры чисел  до тех пор, пока не

будет введен ноль.
Задача 1.Считать сумму введенных с клавиатуры чисел  до тех пор, пока не будет введен ноль.

Слайд 7var a,s:integer; 
begin s:=0; 
writeln('Введите число'); 
readln(a); 
while(a0) do begin s:=s+a; //подсчет суммы S 
writeln('Введите число'); 
readln(a); 
end; 
writeln(s); 
end.

var a,s:integer; begin s:=0; writeln('Введите число'); readln(a); while(a0) do begin s:=s+a; //подсчет суммы S writeln('Введите число'); readln(a); end; writeln(s); end.

Слайд 8Задача 2.
Даны два отрезка А и B (A>B). Не используя операции

умножения и деления, определить, сколько отрезков В уместится в отрезке А.
Задача 2.Даны два отрезка А и B (A>B). Не используя операции умножения и деления, определить, сколько отрезков

Слайд 9var a,b,s,k:integer; 
begin 
writeln('Введите длину отрезка А'); 
readln(a); 
writeln('Введите длину отрезка B'); 
readln(b); 
k:=0; S:=a; 
while s

//переменная k считает количество выполнения тела цикла 
s:=s+a; //суммирует длину отрезка А end; 
writeln('В отрезке В содержится ',k,' отрезков А'); 
end.
var a,b,s,k:integer; begin writeln('Введите длину отрезка А'); readln(a); writeln('Введите длину отрезка B'); readln(b); k:=0; S:=a; while s

Слайд 10Задача
Вычислить сумму ряда 1+1.5+2+2.5+3+3.5+ .. + 20

ЗадачаВычислить сумму ряда 1+1.5+2+2.5+3+3.5+ .. + 20

Слайд 11Решение
var    sum:real;    n:real;
BEGIN   
sum:=0;   
n:=1;   


while n <= 30 do         
begin           
sum:=sum+n;           
n:=n+0.5;         
end;   
writeln('Сумма равна: ',sum);
END.
Решениеvar    sum:real;    n:real; BEGIN    sum:=0;    n:=1;    while n

Что такое shareslide.ru?

Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.


Для правообладателей

Яндекс.Метрика

Обратная связь

Email: Нажмите что бы посмотреть