Пж напишите праграмму в паскале 7 класс по этим задачам
Даю 30 баллов!!!!!
1. Задано двузначное число. Найдите среднее арифметическое цифр числа.
2. Площадь участка измеряется в арах. Найдите количество полных км квадратных

var x, x1, x2 :integer;y:real;begin  //Ввод  writeln ('Введите число');  readln (x);  //решение x1:=x mod 10; {x1 записываем единицы} x2:= x div 10;{x2 записываем десятки} y:=(x1+x2)/2;  //вывод writeln (y);  end.