9 класс информатика напишите как знаете только напишите

Странно. Уже решал такой набор задач, только с другими данными:Задача №1//PascalABC.NET (версия 3.1, сборка 1198)var  x: integer;  y: biginteger;begin  x:=readlninteger('Введите Х ');  y := sqr(x) * sqr(x) * sqr(x);println(y);  y := sqr(y)/sqr(x);println(y);  y := y * sqr(x) * sqr(x) * x;println(y);  y := y * sqr(x) * sqr(x);println(y);end.Тестовое решение:Введите Х  264 1024 32768 524288 Задача №2//PascalABC.NET (версия 3.1, сборка 1198)var  a, b, c: integer;begin  writeln('Введите 3 числа');  readln(a, b, c);  swap(a, b);swap(a, c);  println(a, b, c);end.Тестовое решение:Введите 3 числа2 3 44 2 3