Question

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

Answer 1

Var a,b:integer;
begin
readln(a);
readln(b);
writeln((a+b)/2:4:2);
end.

Answer 2

Readln(a); readln(b);
c:=(a+b)/2;
write('Среднее арифметическое -', c);

Answer 3

Вот пример программы на языке Pascal для вычисления среднего арифметического из двух чисел:

program CalculateAverage;
var
  num1, num2, average: real;
begin
  writeln('Введите первое число: ');
  readln(num1);
  
  writeln('Введите второе число: ');
  readln(num2);
  
  average := (num1 + num2) / 2;
  
  writeln('Среднее арифметическое чисел ', num1, ' и ', num2, ' равно ', average:0:2);
end.

Эта программа сначала запрашивает у пользователя два числа, затем вычисляет их среднее арифметическое и выводит результат на экран.