Линейный процесс. Составление программы вычисления указанных величин при произвольных значениях исходных величин

Федеральное агентство по образованию

РФ

Санкт- Петербургский государственный горный институт им. Г.В. Плеханова

Информатика

Расчетно-графическое задание №1

Работа в TURBOPASCAL

Самоленков С. В.

ТНГ-06-2

Выполнил: студент гр.   _______    ____________________           /_______________/

                                                                            ^{(подпись)                                (Ф.И.О.)}

	Старший преподаватель
			Быкова Е. В.

 

Проверил:       ________         ________________         /________________/

                             ^{(должность)                             (подпись)                                             (Ф.И.О.)}

САНКТ-ПЕТЕРБУРГ

2007 г.

Лабораторная работа 2

Линейный процесс

Задача 1

            Вычислить объем и площадь поверхности заданного тела. Вычисления выполнить с точностью до третьего десятичного знака.

         Вариант 6.

         Заданное тело: ангар в форме полуцилиндра, в основании которого находится прямоугольник.

         Исходные данные: стороны прямоугольника a и b.

Основные формулы.

Объем цилиндра

        

Площадь поверхности

           

{Самоленков С. В. ТНГ-06-2 Вариант 6}

{ объем и площадь поверхности ангарa}

Program Angar;

Uses Crt;

Var a, b, V, S: real;

Begin

 WriteLn('Введите значение a=');

 ReadLn(a);

 WriteLn('Введите значение b=');

 ReadLn(b);

 v:=a*b*b*pi/8;

 s:=pi*b*(a+b/2)/2;

 WriteLn;

 WriteLn('Обьем ангара v=',v:6:4);

 WriteLn('Площадь полной поверхности ангара s=',s:6:4);

End.

Результат

Введите значение a=

5

Введите значение b=

10

Обьем ангара v=196.3495

Площадь полной поверхности ангара s=157.0796

Проверка в Excel

Задача 2

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