Задание

Приведена блок-схема алгоритма. Написать программу, которая вводит три числа с клавиатуры и выводит их сумму и произведение на экран монитора. Упорядочить операторы в программе.

s,p,a,b,c:real; {S, P, C, B, A - действительные переменные}

begin {Начало алгоритма}

writeln('vvedite a,b,c'); {Вывести на экран запрос на ввод 3 чисел}

readln(a,b,c); {Оператор ввода данных}

p:=(a+b+c)/2; {Вычисление полупериметра треугольника}

s:=sqrt(p*(p-a)*(p-b)*(p-c)); { Вычисление площади треугольника}

Writeln('ploshad = ',s:4:2); {Вывести на экран площадь треугольника S с комментариями}

end.

Program N8; {Заголовок программы}

Var {Раздел описания переменных}