program qq;
var a,b,c: integer;
begin
writeln('vvod a,b');
read(a,b);
c: =a/b;
writeln(a,'/',b,'=',c);
end.
деление целых чисел записывается иначе: a div b.
program qq;
var a,b,c: integer;
begin
writeln('vvod a,b');
read(a,b);
c: =a/b;
writeln(a,'/',b,'=',c);
end.
деление целых чисел записывается иначе: a div b.