с клавиатуру вводятся 2 целых числа.найди целую часть при делении первого числа на другое!
var a,b:integer; begin read(a,b); writeln(a div b); end.
var a,b:integer;
begin
read(a,b);
writeln(a div b);
end.