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

Question

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

Answer 1

1)
Program n1;
var a: integer;
begin
readln(a);
write((a mod 10 +a div 10)/2);
end.
2)
Program n2;
var a: integer;
begin
readln(a);
write(a div 10-a mod 10);
end.

Answer 2

Задача №1