Паскаль
Подсчитать средний по 3 предметам

var

score_math, score_rus, score_EN : integer;

begin

writeln('Введите свой по русскому языку: ');

readln(score_rus);

writeln('Введите свой по математике: ');

readln(score_math);

writeln('Введите свой по английском языку: ');

readln(score_EN);

writeln('Ваш средний :', (score_math+score_rus+score_EN) / 3:5:2);

end.