Запишите программу ** языке Паскаль согласно заданному алгоритму

Question

Запишите программу на языке Паскаль согласно заданному алгоритму

---

Answer 1

Var A, B, C, D, E, Y: integer;
BEGIN
read (A);
B:=A*A;
C:=B+4;
D:=C*C;
E:=D/7;
Y:=E+5;
write (Y);
END.