Тема урока "Конструирование и реализация алгоритмов: использование вспомогательных алгоритмов"
Сегодня на уроке вы:
вспомните, что такое подпрограммы-процедуры и функции;
закрепите умения реализовывать подпрограммы с помощью процедур и функций.
Давайте вспомним!
Вспомогательными алгоритмы – это алгоритмы, которые работают в составе других алгоритмов и используются для решения отдельных подзадач.
Подпрограммы используются для записи вспомогательных алгоритмов при программировании.
Посмотри видеоролик "Запись вспомогательных алгоритмов на языке Паскаль"
Пример 1
Составить программу с функцией сложения 2-х любых чисел.
program pr1;
var a, b, c: integer;
function sum(x, y: integer): integer;
begin
sum := x + y;
end;
begin
readln(a, b);
writeln(sum(a, b));
end.
Пример 2
Написать подпрограмму-функцию степени числа, где a, х –любые числа.
Пример 3
Составить программу с процедурой сложения 2-х чисел, значения вводятся с клавиатуры.
program pr3;
var a,b,s:real;
procedure summa (x,y:real; var s:real);
begin
s:=x+y;
end;
begin
writeln ('Введите 2 числа'); read (a,b);
summa (a,b,s);
writeln ('s=', s);
end.
Пример 4
Составить программу с процедурой нахождения максимального из четырёх чисел, вводимых с клавиатуры.
program pr4;
var a,b,s,c,d:real;
procedure maxim (x,y: real; var s:real);
begin
if x<y then s: =y else s: =x;
end;
begin
writeln ('Введите 4 числа '); readln (a,b,c,d);
maxim (a,b,s);
maxim (c,s,s);
maxim (d,s,s);
writeln('max=', s);
end.
Выполни задания
Повтори § 2.4.
Выполни задания 1-6 в тетради: