Begin8. Даны два числа $$a$$ и $$b$$. Найти их среднее арифметическое: $$(a+b)/2$$.
Решение:
1 2 3 4 5 6 7 8 9 10 11 |
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 можно посмотреть здесь.
Комментарии: