Составьте программу на компьютере нахождение средних арифметических 2 чисел

можно паскаль

пожалуйста

ок

ща

uses crt; var a,b,c:byte begin Writeln('Введите 2 числа через пробел') readln(a,b,c) c:=(a+b) div 2 Writeln('Среднее арифметическое ', c) Readln End.По-моему так, ну ты скоомпелируй если что