Информатика на пять О нас
 Добавить в избранное
5byte.ru
 Теория
 8 класс
 9 класс
 10 класс
 11 класс
Задания
 8 класс
 9 класс
 10 класс
 11 класс
Книги
Тесты
ЕГЭ
Turbo Pascal 7
 Описание
 Задачи
HTML
Рефераты

Задача 7.

Вычислить периметр прямоугольника со сторонами А и В.

{Обозначим периметр буквой Р, тогда Р =(А+В)*2. Составим программу при конкретных значениях А и В. Пусть А = 8,В = 21.}


program prim2;
   uses crt;
{Описываем переменные.}
   var a, b, p: real;
begin
{Производим очистку экрана.}
   clrscr;
{Присваиваем переменным значения.}
   a:=8;
   b:=21;
{Вычисляем периметр прямоугольника.}
   p:=(a+b)*2;
{Выводим значения периметра на экран.}
write('p=' ,p);
end. {обязательный оператор}





 У Вас есть материал пишите нам
 
    Copyright © 2008    
Rambler's Top100