Программирование на ТР 7 класс_2 уро4

Тема: Нахождение периметра и площади прямоугольника и квадрата заданными сторонами.

Цели: -научить решать математические задачи в турбо паскаль.

- научить выводить ответы на экран.

Ход урока

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

Приветствие.

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

Какие типы переменных знаете? Для чего они так разделены между собой?

3. Изучение новой темы.

Зад. Вывести на экран периметр прямоугольника с заданными сторонами. Задача для самостоятельного выполнения.

Сначала рисуем блок схему. Аккуратно нарисуйте блок схему. Что нам дано по условию задачи? Текст программы составим мы вместе.

Program perimetr;

Var a,b,p:real;

Begin

Writeln('vvedite a');

Readln(a);

Writeln('vvedite b');

Readln(b);

P:=2*(a+b);

Readln('perimetr=',p);

Readln;

End.

Program perimetr;

Var a,p:real;

Begin

Writeln('vvedite a');

Readln(a);

P:=4*a;

Readln('perimetr=',p);

Readln;

End.