Практическая работа на тему "Линейная программа"

Практическая работа №1 (первый семестр)

Задание

Написать на языке Паскаль программу для следующей задачи: Ввести три двузначных числа целого типа. Найти среднее арифметическое этих чисел и вывести его с использованием формата по умолчанию и явно заданного формата.

Порядок выполнения работы

1.Составить программу по заданному условию:

program lin1;

  var

      a,b,c    : integer;

      d          :  real;

begin

     WriteLn('Введите значения переменных A,B,C ');

     ReadLn(a,b,c);

           d := (a+b+c)/3;

     WriteLn('d = ',d);

     WriteLn('d = ',d:5:2);

end.

2.Запустить Паскаль

3.Ввести программу в компьютер.

4.Исправить все ошибки.

5.Запустить программу на выполнение.

6.Вести исходные значения переменных

a=12       b=17    c=32

7.Проверить правильность расчетов, используя тестовый пример.