Напишите программу для решений задач. Используйте операции div и mod. Задано двузначное...

Question

Напишите программу для решений задач. Используйте операции div и mod.
Задано двузначное число. Найдите среднее арифметическое цифр числа

Answer 1

Var
a:integer;
begin
Readln(a);
Writeln((a div 10 + a mod 10)/2);
end.

Пример:
12
1.5