Пример программы, реализующей подсчёт суммы 3 переменных:
programSum;
vara,b,c,S: real;
begin
readln(a,b,c);
S := a+b+c;
writeln(S);
end.
Написать программы для решения следующих задач:
Вычисление среднего арифметического 3 чисел.
Вычисление площади треугольника по введённым основанию и высоте.
готово
Объяснение:
program srednee;
var a, b, c, S: real;
begin
readln(a, b, c);
S := (a + b + c) / 3;
writeln('Среднее арифметическое равно ', S);
end.
program ploshad;
var a, h, S: real;
begin
readln(a, h);
S := a * h / 2;
writeln('Площадь треугольника равна ', S);
end.