Подчеркните однозначно верные утверждения для данного условия и диаграммы.​

vara,b: integer; c: real; beginwriteln ('1'); read (a); writeln ('2'); read (b); c: =(a/1)/(1/b); writeln (c); end.

var a,res: integer;

begin

writeln('введите число');

readln(a);

res: =sqr(a);

writeln('квадрат числа,'a', равен,'res',');

readln;

end.

5`120`000 бит =  640 000 байт = 625 кб

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

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