Помигите!!! С информатикой дали задание не объяснив ни темы ни чего.
Первый номер
Program n_1;
var x, y: integer;
begin
readln(x);
y:=x*x*x*x+5*x*x*x;
writeln(y);
end.
Второй номер
Program n_2;
var a, b: integer;
a:=3;
b:=2;
writeln((b*b*a*b*b+b*a)-a);