Решаем задачи Абрамян на Паскале. Begin 8

Begin8. Даны два числа $$a$$ и $$b$$. Найти их среднее арифметическое: $$(a+b)/2$$.

Решение:

program Begin8;
var
  a,b,SA: Real;
begin
  Write('Введите число a: ');
  Readln(a);
  Write('Введите число b: ');
  Readln(b);
  SA:=(a+b)/2;
  Writeln('Среднее арифметическое a и b равно: ', SA);
end.

program Begin8;

var

a,b,SA: Real;

begin

Write('Введите число a: ');

Readln(a);

Write('Введите число b: ');

Readln(b);

SA:=(a+b)/2;

Writeln('Среднее арифметическое a и b равно: ', SA);

end.

Другие задачи из раздела Begin можно посмотреть здесь.

Решаем задачи Абрамян на Паскале. Begin 8

Комментарии:

Добавить комментарий Отменить ответ