Определите тип результата если x-integer y-real c-char.

program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

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