Напишите в тетради программы на Паскале для решения следующих задач:
Задача 1. Введено трехзначное целое число Х. Получите их него новое пятизначное число Y, приписав слева и справа к числу Х количество его десятков.
Пример: x=456, y=54565

Задача 2. Введено четырехзначное число Х. Найдите произведение первой и третьей цифры данного числа; сумму второй и четвертой цифры данного числа.

это 1 задача?

program Job;var a,b,c:integer;begin Writeln('Введите число');read(a);b:= a div 10 mod 10;Writeln(b,a,b); end.