Question

input q list of integer from uses and to find and display the square of even number​

Answer 1

Answer:

sq_sum:=0;

for i:= 1 to 1000

begin

sq := i*i;

writeln(i,’: ‘, sq);

sq_sum := sq_sum + sq;

end

writeln(‘sum of squares: ’, sq_sum);

writeln(‘average of squares: ’, sq_sum/1000);

Or something like that. It’s been decades since I last used Pascal.

Hope i am correct

Pls mark as brilliantist this will be a lot of help