Запиши на Паскале логическое выражение: a по середине между b и c

8, 1, 4, 1, 5, 9, 6, 7, 2

в не указан   шаг изменения x , допустим он равен 1

var

x,y: real;

begin

x: =1;

while x< =10 do

begin

y: =1/x-5;

writeln(y: 8: 2);

x: =x+1;

end;

end.

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

end.чему в школе то  

|з       з|

|         з|

|з   з     |