Циклы (повтор) в программах. Повторить и закрепить знания составления линейных, разветвляющихся программ

Июль 25, 2022

Главная
Информатика
Циклы (повтор) в программах. Повторить и закрепить знания составления линейных, разветвляющихся программ

Содержание

2. 1)Повторить и закрепить знания составления линейных, разветвляющихся программ; 2)Научиться составлять программы, используя циклический оператор – FOR
3. Вставьте пропущенное: Program Sql; Var A,B,C,D, XI, Х2: ???; Begin Writeln ('Введите коэффициенты квадратного уравнения’); Readln
4. Вопросы группе: 1)В чем отличие программ с ветвлением от линейных? 2)С помощью каких операторов осуществляется выбор
5. 1)Операторы Ввода/вывода; 2)Операторы выбора; 3) а:=а+3 – что произойдет? 4)Перечислить типы данных; 5)Убрать лишнее AND,OR,END, NOT,IF;
6. Расставьте соответственно:
7. Действительно ли результат а меньше 3? a:= 7 b:= - 10 a:=a*(- 7) b:=159 a:=b+a
8. Найдите 5 ошибок в программе: Program krug ; VAR Pi, r, S: real; Pi:=3.14, WRITELN(‘vvedite radiuc
9. Program krug ; VAR Pi, r, S: real; begin Pi:=3.14, WRITELN(‘vvedite radiuc r=’), READ(r); S:=Pi *r*r;
10. Задача №1 Дано целое N, определить является ли оно четным или нечетным. 2, 4, 6, …-
11. Алгоритм Алгоритм Chislo; перем N: целые; начало Вывод(‘vvedite chislo’); Ввод (N); ЕСЛИ N mod 2 =0
12. Алгоритм Алгоритм Chislo; перем N: целые; начало Вывод(‘vvedite chislo’); Ввод (N); ЕСЛИ N mod 2 =0
13. Задача №2 Дано целое двузначное число N (DE), где D – количество десятков, Е – единиц.
14. Алгоритм Алгоритм Chislo; перем N,E,D,S: целые; начало Вывод(‘vvedite chislo’); Ввод (N); E:=N mod 10; D:=N div
15. Определение: Программы в которых многократно повторяются однотипные действия – циклические программы (с повтором).
16. Задача: Дано 100 натуральных чисел от 1 до 100 (1,2,3, … 99,100) Посчитать их сумму и
17. Алгоритм сумма; Перем i,S: целые; Начало S:=0; Для i:=1 до 100 повторять Начало S := S
18. Program summa; VAR i,S: integer; Begin S:=0; FOR i:=1 TO 100 DO begin S:=S+i тело end;
19. Program summa; VAR i,S: integer; Begin S:=0; FOR i:=1 TO 100 DO begin S:=S+i ; тело
20. Тело цикла – те самые действия, которые нужно многократно повторять. Тело цикла заключаем в операторные скобки
21. ALT + F9 - исправление ошибок CTRL + F9 – запуск программы ALT + F5 –
22. Задача: 1)Вывести столбец таблицы умножения любого целого числа N на числа от 1 до 10. Пример:
23. Домашнее задание: прокомментировать программу для задачи «Про столбец таблицы умножения»
25. Скачать презентацию

Слайд 2

1)Повторить и закрепить знания составления линейных, разветвляющихся программ;
2)Научиться составлять программы,

используя циклический оператор –
FOR i:=1 TO n DO
Begin
операторы(тело цикла)
end;
3)Применять операторы в решении типовых задач.

Цель урока:

Слайд 3

Вставьте пропущенное:
Program Sql;
Var A,B,C,D, XI, Х2: ???;
Begin
Writeln ('Введите коэффициенты квадратного

уравнения’);
Readln ( ??? );
D:=B*B-4*A*C;
If D<0 Then Writeln (‘??? ') Else
???
X1 :=(-B+ ??? (D))/2/A; X2:=(-B- ???(D))/2/A;
Writeln ('Xl=', Xl:8:3,' X2=',X2:8:3)
???
End.

Слайд 4

Вопросы группе:
1)В чем отличие программ с ветвлением от линейных?
2)С помощью

каких операторов осуществляется выбор в программах?
3) begin….end – Что это? Каковы правила использования в программе?

Слайд 5

1)Операторы Ввода/вывода;
2)Операторы выбора;
3) а:=а+3 – что произойдет?
4)Перечислить типы данных;
5)Убрать лишнее AND,OR,END,

NOT,IF;
6) ; - что обозначает?
7) Как обозначается конец программы?
8) Перечислить арифметические операции.
9) Чему равно 120 mod 65 = ?
10) Операторы цикла.

Слайд 6

Расставьте соответственно:

Слайд 7

Действительно ли результат а меньше 3?
a:= 7
b:= - 10
a:=a*(- 7)
b:=159
a:=b+a

Слайд 8

Найдите 5 ошибок в программе:
Program krug ;
VAR Pi, r, S: real;

Pi:=3.14,
WRITELN(‘vvedite radiuc r=’),
READ(r);
S=Pi *r*r;
WRITELN(‘Ploshad kruga S= ’, S)
end

Слайд 9

Program krug ;
VAR Pi, r, S: real;
begin
Pi:=3.14,
WRITELN(‘vvedite radiuc

r=’),
READ(r);
S:=Pi *r*r;
WRITELN(‘Ploshad kruga S= ’, S)
end.

Слайд 10

Задача №1
Дано целое N, определить является ли оно четным или нечетным.

2, 4, 6, …- четные, т.к. делятся без остатка на 2( N mod 2 =0)
1, 3, 7,… - нечетные, т.к. делятся на 2 с остатком 1(N mod 2 =1)

Слайд 11

Алгоритм
Алгоритм Chislo;
перем N: целые;
начало
Вывод(‘vvedite chislo’);
Ввод

(N);
ЕСЛИ N mod 2 =0 ТO Вывод( N,‘- chetnoe‘);
ЕСЛИ N mod 2 =1 ТO Вывод( N,‘- nechetnoe‘);
конец.

Слайд 12

Алгоритм
Алгоритм Chislo;
перем N: целые;
начало
Вывод(‘vvedite chislo’);
Ввод

(N);
ЕСЛИ N mod 2 =0 ТO Вывод( N,‘- chetnoe‘);
ЕСЛИ N mod 2 =1 ТO Вывод( N,‘- nechetnoe‘);
конец.

Слайд 13

Задача №2
Дано целое двузначное число N (DE),
где D – количество

десятков, Е – единиц.
Определить будет ли сумма цифр этого числа равна 10.
Пример: у 28-ми сумма S=2+8=10 – будет, а у 27-ми S=2+7=9 не будет
Будем считать десятки: D= N div 10,
а единицы:E= N mod 10

Слайд 14