Слайд 1ПРОГРАММИРОВАНИЕ ЦИКЛИЧЕСКИХ АЛГОРИТМОВ
НАЧАЛА ПРОГРАММИРОВАНИЯ
Слайд 2Ключевые слова
while ( цикл-ПОКА)
repeat (цикл-ДО)
for (цикл с параметрами)
Слайд 3Программирование циклов с заданным условием продолжения работы
Общий вид оператора:
while
do
Здесь:
— логическое выражение; пока оно истинно, выполняется тело
цикла;
— простой или составной оператор, с помощью которого записано тело цикла.
Решение задачи «Это степень двойки?»
Слайд 4program n_14;
var x, y, q, r: integer;
begin
writeln (‘Частное
и остаток’);
write (‘Введите делимое x>>’);
readln (x);
write (‘Введите
делитель y>>’);
read (y);
r:=x;
q:=0;
while r>=y do
begin
r:=r-y;
q:=q+1
end;
writeln (‘Частное q=’, q);
writeln (‘Остаток r=’, r)
end.
Слайд 5Программирование циклов с заданным условием окончания работы
Общий вид оператора:
repeat
оператор2; …; > until
Здесь:
; ; … — операторы, образующие
тело цикла;
— логическое выражение; если оно ложно, то выполняется тело цикла.
Слайд 6program n_15;
var i: integer; x: real;
begin
writeln (‘График тренировок’);
i:=1;
x:=10;
repeat
i:=i+1;
x:=x+0.1*x;
until x>=25;
writeln (‘Начиная с
‘, i, ‘-го дня спортсмен будет пробегать 25 км’)
end.
Слайд 7Программирование циклов с заданным числом повторений
Общий вид оператора:
for :=
to
do
Здесь:
— переменная целого типа;
и — выражения
того же типа, что и параметр;
— простой или составной оператор — тело цикла.
42 Задача: Возведение числа в степень при помощи Python
Слайд 8Программирование циклов с заданным числом повторений
Общий вид оператора:
for :=
to
do
После каждого выполнения тела цикла происходит увеличение на единицу
параметра цикла; условие выхода из цикла – превышение параметром конечного значения.
Слайд 9program n_16;
var i,n:integer;a,y:real;
begin
writeln (‘Возведение в степень’);
write (‘Введите
основание a>>’);
readln (a);
write (‘Введите показатель n>>’);
readln (n);
y:=1;
for i:=1 to n do y:=y*a;
writeln (‘y=’, y)
end.
Слайд 10Различные варианты программирования циклического алгоритма
Для решения одной и той же
задачи могут быть созданы разные программы.
Организуем ввод целых чисел
и подсчёт количества введённых положительных и отрицательных чисел. Ввод должен осуществляться до тех пор, пока не будет введён ноль.
В задаче в явном виде задано условие окончания работы.
Воспользуемся оператором repeat.
Слайд 11program n_17;
var n, k1, k2: integer;
begin
k1:=0;
k2:=0;
repeat
write (‘Введите целое число>>’);
readln (n);
if
n>0 then k1:=k1+1;
if n
Слайд 12Ввод осуществляется до тех пор, пока не будет введён ноль.
продолжается, пока n 0.
Воспользуемся оператором while:
program n_18;
var
n, k1, k2: integer;
begin
k1:=0;
k2:=0;
n:=1;
while n<>0 do
begin
writeln (‘Введите целое число>>’);
read (n);
if n>0 then k1:=k1+1;
if n
Слайд 13Самое главное
В языке Паскаль имеются три вида операторов цикла:
while
(цикл-ПОКА)
repeat (цикл-ДО)
for (цикл с параметром).
Если число повторений тела цикла известно,
то лучше воспользоваться оператором for; в остальных случаях используются операторы while и repeat.
Слайд 14Вопросы и задания
1. Дана последовательность операторов:
a:=1;
b:=2;
while a+b
раз будет повторен цикл и какими будут значения переменных a,
b, s после исполнения этой последовательности операторов?
Слайд 15Вопросы и задания
2. Требовалось написать программу вычисления факториала числа n
(факториал числа n есть произведение всех целых чисел от 1
до n).
Программист торопился и написал программу неправильно.
Ниже приведён фрагмент его программы, в котором содержится пять ошибок:
k:=1;
f:=0;
while k
Слайд 16Вопросы и задания
3. Дана последовательность операторов:
a:=1;
b:=1;
repeat
a:=a+1;
b:=b*2;
until b>8;
s:=a+b
Сколько раз будет повторён цикл и какими будут значения переменных a, b, s после исполнения этой последовательности операторов?
Слайд 17Вопросы и задания
4. Напишите программу, в которой осуществляется ввод целых
чисел (ввод осуществляется до тех пор, пока не будет введён
ноль) и подсчёт суммы и среднего арифметического введённых положительных чисел.
Используйте оператор repeat.
Слайд 18Вопросы и задания
5. Напишите программу, в которой осуществляется ввод целых
чисел (ввод осуществляется до тех пор, пока не будет введён
ноль) и определение максимального (наибольшего) из введённых чисел.
Используйте оператор repeat.
Слайд 19Вопросы и задания
6. Напишите программу вычисления наибольшего общего делителя двух
целых чисел:
а) используйте оператор repeat;
б) используйте оператор while.
Слайд 20Вопросы и задания
7. Сколько раз будет выполнен цикл?
а) for i:=0
to 15 do s:=s+1;
б) for i:=10 to 15 do s:=s+1;
в)
for i:=-1 to 1 do s:=s+1;
г) for i:=10 to 10 do s:=s+1;
д) k:=5;
for i:=k-1 to k+1 do s:=s+1;
Слайд 21Вопросы и задания
8. Напишите программу, которая 10 раз выводит на
экран ваши имя и фамилию.
Слайд 22Вопросы и задания
9. Напишите программу, выводящую на экран изображение шахматной
доски, где чёрные клетки изображаются звёздочками, а белые — пробелами.
Слайд 23Вопросы и задания
10. Напишите программу, которая вычисляет сумму:
а) первых n
натуральных чисел;
б) квадратов первых n натуральных чисел;
в) всех чётных чисел
в диапазоне от 1 до n;
г) всех двузначных чисел.
Слайд 24Вопросы и задания
11. Напишите программу, которая генерирует 10 случайных чисел
в диапазоне от 1 до 20, выводит эти числа на
экран и вычисляет их среднее арифметическое.
Слайд 25Вопросы и задания
12. Напишите программу, которая выводит на экран таблицу
степеней двойки (от нулевой до десятой).
Рекомендуемый вид экрана после
выполнения программы представлен ниже:
Таблица степеней двойки:
0 1
1 2
2 4
3 8
4 16
5 32
6 64
7 128
8 256
9 512
10 1024
Источник: theslide.ru
Составить программу которая выводит таблицу степеней двойки от нулевой до десятой
Привет Лёва Середнячок
Напишите программу, которая выводит на экран таблицу степеней двойки( от нулевой до десятой)
Комментарии
Ответ проверен экспертом
2 (3 оценки)
triolana 5 лет назад
Светило науки — 553134 ответа — 388270 раз оказано помощи
PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018
Внимание! Если программа не работает, обновите версию!
begin
Writeln(15*’-‘,NewLine,’Степень Число’,NewLine,15*’-‘);
var r:=1;
for var i:=0 to 10 do begin Writeln(i:3,r:11); r*=2 end
end.
Источник: vashurok.com
Program z11 var a, b string i integer begin
Единственный в мире Музей Смайликов
Самая яркая достопримечательность Крыма
Скачать 18.5 Kb.
Задание 11. Напишите программу, которая 10 раз выводит на экран ваши имя и фамилию.
program z11;
var a, b: string; i: integer;
for i:=0 to 9 do
Задание 12. Напишите программу, выводящую на экран изображение шахматной доски, где черные клетки изображаются звёздочками, а белые – пробелами.
program z11;
var a, b: string; i, k, n: integer;
for i:=0 to 3 do begin
for k:=0 to 3 do
for n:=0 to 3 do
Задание 13. Напишите программу, которая вычисляет сумму:
а) первых n натуральных чисел;
б) квадратов первых n натуральных чисел;
в) всех чётных чисел в диапазоне от 1 до n;
г) всех двузначных чисел.
program z13;
var i, z1, z2, z3, z4, n: integer;
z4 := 0;
for i := 1 to n do
if i mod 2 = 0 then z3 := z3 + i;
end ;
for i := 10 to 99 do z4 := z4 + i;
writeln(‘Сумма первых n натуральных чисел: ‘, z1);
writeln(‘Сумма квадратов первых n натуральных чисел: ‘, z2);
writeln(‘Сумма всех четных чисел: ‘, z3);
writeln(‘Сумма всех двухзначных чисел: ‘, z4);
Задание 14. Напишите программу, которая генерирует 10 случайных чисел в диапазоне от 1 до 20, выводит эти числа на экран и вычисляет их среднее арифметическое.
program z13;
var i, s, d: integer; sr: real;
for i:=1 to 10 do begin
writeln(i, ‘ число: ‘, d);
writeln(‘Среднее арифметическое: ‘, sr)
Задание 15. Запишите на языке Паскаль программы решения задач 33 и 34 из параграфа 2.4. Используйтеоператор for.
program z15_1;
var i, a, b, k: integer;
write(‘Введите первый множитель: ‘);
write(‘Введите второй множитель: ‘);
for i:=1 to b do begin
В программе мы вводим изначальную численность населения. Далее она считает количество населения в каждый год и итогом будет количество населения через три года.
program z15_2;
var i: integer; k, a: real;
write(‘Введите население города: ‘);
for i:=1 to 3 do begin
writeln(i, ‘ год: ‘, a, ‘ человек’)
writeln(‘Численность населения через 3 года: ‘, a)
Задание 16. Напишите программу, которая выводит на экран таблицу степеней двойки (от нулевой до десятой).
Десятую степень не добавили в цикл, она отрабатывает после цикла и выводит эту степень ровно по вертикали.
program z16;
var i, k, a: integer;
writeln(‘Таблица степеней двойки:’);
for i:=1 to 9 do begin
Задание 17. Напишите программу, которая выводит на экран таблицу умножения на n (n – целое число от 2 до 10, вводимое с клавиатуры).
program z17;
var i, k, n: integer;
for i:=2 to 10 do begin
Источник: topuch.com