План-конспект урока по информатике и ИКТ на тему "Практическая работа № 13 «Программирование с использованием подпрограмм» (10 класс)

Класс 10

Дата 21.03.2018

Урок №26

План-конспект урока по информатике и ИКТ

Тема урока: Практическая работа  № 13 «Программирование с использованием подпрограмм»

Цели урока:

1. Практическое закрепление программирования с использованием подпрограмм.

2. Развивать мышление, творческую активность, внимание, интерес к  информатике.

3. Воспитывать самостоятельность, аккуратность, трудолюбие.

Оборудование:

Компьютеры Pentium

Среда программирования Паскаль

ХОД УРОКА.

1. Организационный момент урока.

Приветствие, проверка присутствующих. Объяснение хода урока.

2. Актуализация знаний.

Фронтальный опрос.

подпрограмма - это повторяющаяся группа операторов, оформленная в виде самостоятельной программной единицы.

Чтобы использовать подпрограмму – процедуру её надо описать и к ней надо уметь обращаться.

Описание:

1.      выбрать для неё имя.

2.      определить параметры.

3.      составить последовательность действий, которые надо выполнять, для получения результата.

Обращение: вызов выполнения указанных действий, для конкретных значений параметров.

3. П.р. № 12 «Программирование с использованием подпрограмм»

1. Составьте программу нахождения наибольшего общего делителя трёх чисел, используя следующую формулу: НОД(A,B,C)=НОД(НОД(A,B),C).

program progr1;

var a,b,c: longint;

function nod(a, b: longint): longint;

begin

 while (a <> 0) and (b <> 0) do

 begin

 if a > b then a := a mod b else b := b mod a;

 nod := a + b;

 end;

 end;

 begin

 read(a,b,c);

 Writeln(nod(nod(a,b),c));

 end.

2. Вычислить площадь правильного шестиугольника со стороной "a", используя процедуру вычисления площади треугольника.

program progr2;

var a : integer;

 S : real;

function SquareTr(a : integer) : real;

begin

 SquareTr := (sqrt(3)*a)/2

end;

BEGIN

 writeln('Введите сторону а шестиугольника: ');

 ReadLn(a);

 S := 6 * SquareTr(a);

 Writeln('Площадь шестиугольника со стороной а, равна ', S:3:3);

END.

4. Даны две дроби A/B и C/D (A,B,C,D-натуральные числа). Составить программу для умножения дроби на дробь. 

program test;

var

a,b,c,d:real;

begin

readln(a,b,c,d);

if (a>0) and (b>0) and (c>0) and (d>0) then

writeln((a/b)*(c/d));

end.

4. Домашнее задание.

Прочитать по учебнику параграф 23 (повторить).

5. Подведение итогов.

Что нового вы сегодня узнали на уроке?

Краткое описание документа:

Тема урока: Практическая работа№ 13 «Программирование с использованием подпрограмм»

Цели урока:

1. Практическое закрепление программирования с использованием подпрограмм.

2. Развивать мышление, творческую активность, внимание, интерес к информатике.

3. Воспитывать самостоятельность, аккуратность, трудолюбие.

Оборудование:

Компьютеры

Среда программирования Паскаль