Даны 2 числа а и b. Найти целую часть от деления а на b и остаток от деления а на b. (В качестве имени переменной для хранения целой части будем использовать имя х, а для остатка от деления — имя z.) Спасибо!
program pr; var a,b,x,y:integer; begin writeln('введите a,b'); readln(a,b); x:=a div b;
z:=a mod b; writeln('целое =',x);
writeln('остаток =',z); end.
Буду благодарна, если отметите