Презентация "Последовательный алгоритм. Решение задач"


Подписи к слайдам:
Урок 3. Первая программа в Pascal.

Урок 5.  Последовательный алгоритм. Решение задач.

Подготовил презентацию: Гришко К.Е Учитель информатики и ИКТ

Информация с сайта: learnpascal.ru Уроки Pascal. от новичка до победителя

Домашняя работа

Подготовиться к самостоятельной работе:

  • Повторить структуру написания программы
  • Алгоритм построения линейного графа
  • Основной синтаксис
  • Вспомнить формулы нахождения периметра, площади, нахождения длины окружности.

Информация с сайта: learnpascal.ru Уроки Pascal. от новичка до победителя

Практическая работа

  • Прочитать задачу.
  • Выписать известные и неизвестные нам переменные в «дано».
  • Вспомнить либо составить необходимые формулы.
  • Написать словесный алгоритм решения задачи
  • Составить блок-схему.
  • Записать решение на языке программирования Pascal.

Задача №1:  Дан диаметр окружности d. Найти ее длину L = π·d. В качестве значения π использовать 3.14.

Задача №2:  Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = a·b·c и площадь поверхности S = 2·(a·b + b·c + a·c).

Информация с сайта: learnpascal.ru Уроки Pascal. от новичка до победителя

Алгоритм решения задач:

Практическая работа

Задача №1. Дан диаметр окружности d. Найти ее длину L = π·d. В качестве значения π использовать 3.14.

Так как π не изменяется в течение программы,

π — константа.

Информация с сайта: learnpascal.ru Уроки Pascal. от новичка до победителя

program Begin4;

const pi = 3.14;

var d, L: real;

begin

write('Введите диаметр окружности : ');

readln(d); L := pi * d;

write('Длина окружности -- ', L);

end.

Практическая работа

Задача №2:  Даны длины ребер a, b, c прямоугольного параллелепипеда.

Найти его объем V = a·b·c и площадь поверхности

S = 2·(a·b + b·c + a·c).

Информация с сайта: learnpascal.ru Уроки Pascal. от новичка до победителя

program Begin6;

var v, a, b, c, s: real;

begin write('Введите значения a, b, c: ');

readln(a, b, c);

v := a * b * c;

s := 2 * (a * b + b * c + a * c);

writeln('Объем параллелепипеда -- ', v);

writeln('Площадь поверхности параллелепипеда -- ', s);

end.

Практическая работа Дополнительные задания

Задачи 4. Даны два числа a и b. Найти их среднее арифметическое: (a + b)/2.

Задачи 5. Найти длину окружности L и площадь круга S заданного радиуса R:  L = 2·π·R,   S = π·R2.                   В качестве значения π использовать 3.14.

Задачи 5. Даны два неотрицательных числа a и b. Найти их среднее геометрическое, то есть квадратный корень из их произведения: √(a*b).

Для нахождения квадратного корня мы используем функцию sqrt.