Program myprog; Var n,s:integer;
begin
n:= 5;
S:= 3;
n:=s-1;
s:= n *n;
n:= n + 5;
S:= S + n;
write(s);
end.

Swaggygirl    3   01.12.2021 13:23    0