Программирование на языке Паскаль. Циклы. Тема 4

Циклы
Цикл – это многократное выполнение одинаковой последовательности действий.
цикл с известным числом шагов
цикл с неизвестным числом шагов (цикл с условием)
Задача. Вывести на экран 5 раз слово «Привет».
Особенность: одинаковые действия выполняются 5 раз.

Циклы
program qq;
begin
writeln('Привет');
writeln('Привет');
writeln('Привет');
writeln('Привет');
writeln('Привет');
end.

Циклы
начало
конец
Блок-схема:
да
нет
тело цикла

Циклы
program Privet;
begin
{ сделай 5 раз }
writeln('Привет');
end.
N := N + 1;

Алгоритм
начало
Привет!
конец
да
нет
N = 5?
N := 0;
N := N + 1;
еще не сделали ни одного раза
проверить, все ли сделали
вывод на экран
считаем очередной шаг

Цикл с условием
program Privet2;
var N: integer;
begin
N:= 0;
while ( N <> 5 ) do begin
writeln('Привет!');
N:= N + 1;
end
end.

Ввод количества
program Privet2;
var N : integer;
begin
N:= 0;
writeln('Введите число шагов:');
read(K); while ( N <> ) do begin
writeln('Привет!');
N:= N + 1;
end
end.
K
, K

Цикл с условием
Вместо знаков вопроса добавьте числа и операторы так, чтобы цикл выполнился ровно 5 раз:
program Privet3;
var N: integer;
begin
N:= 5;
while ( N <> ??? ) do begin
writeln('Привет!');
???;
end
end.
0
N:= N - 1;

program Primer1;
var N: integer;
begin
N:= 1;
while ( N <= 5 ) do begin
writeln(N);
N:= N + 1;
end
end.
Что получим?
1
2
3
4
5

program Primer2;
var N: integer;
begin
N:= 1;
while ( N <= 5 ) do begin
writeln(N);
N:= N + 2;
end
end.
Что получим?
1
3
5

program Primer4;
var N: integer;
begin
N:= 1;
while ( N <= 5 ) do begin
writeln(N*N*N);
N:= N + 1;
end
end.
Что получим?
1
8
27
64
125

program Primer5;
var N: integer;
begin
N:= 5;
while ( N >= 1 ) do begin
writeln(N*N*N);
N:= N - 1;
end
end.
Что получим?
125
64
27
8
1

Задания
«3»: Ввести натуральное число вывести квадраты и кубы всех чисел от 1 до этого числа.
Пример:
Введите натуральное число:
3
1: 1 1
2: 4 8
3: 9 27
«4»: Ввести два целых числа a и b (a ≤ b) и вывести квадраты все чисел от a до b.
Пример:
Введите два числа:
4 5
4*4=16
5*5=25