РОССИЙСКИЙ  ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ 

ИННОВАЦИОННЫХ ТЕХНОЛОГИЙ И ПРЕДПРИНИМАТЕЛЬСТВА

ПЕНЗЕНСКИЙ  ФИЛИАЛ 
 
 
 
 
 
 

ОТЧЕТ

о выполнении лабораторной работы №1  по информатике

  Тема: “ Программирование алгоритмов линейной структуры"

 
 
 
 
 
 
 
 
 
 
 
 
 
 

Выполнил:  студент гр. 10П1 Пятков М.

Проверил:  доцент    Власов В.П. 
 
 
 
 
 
 

                                                                         2011 г.

  Лабораторная  работа № 1. 
Программирование алгоритмов

  линейной  структуры

  Цель  работы: изучение структуры программы на языке Turbo Pascal; типов данных; составление простых неразветвленных программ. 
 

  Содержание  работы 

  Вариант № 3 

  Текст задания

 

  Блок-схема программы: 

    

    

    
 

    
 

    
 
 

    

    
 

    

    
 
 
 
 
 
 
 
 

  Код программы:  

  program1 lab_1;

  uses crt;

  var

        x,y,a,b,c :real;

  begin

     clrscr;

     writeln(‘Vvedite chislo x (x<>0)’);

     write(‘x = ’);

     readln(x);

     c:=sin(x*x*x)/cos(x*x*x);

     a:=c*c*c;

     b:=1+sqrt(x);

     y:=exp(-(x*x/2))+exp(1/3*ln(abs(a/b)));

     writeln(‘Rezultat : y = ’,y:5:3);

     readkey

  end. 

  Результат: 

    
 

Вывод : В процессе лабораторной работы была изучена структура программы на языке Turbo Pascal; типы данных.