var n,z,s,x:integer;beginwriteln('Vvedite N');read(n);writeln('Vvedite Z');read(z);writeln('Vvedite S');read(s);x:=(n*z);writeln('Edinis ',x div z);writeln('Sdacha ',s mod x);end.
var n,z,s,x:integer;
begin
writeln('Vvedite N');
read(n);
writeln('Vvedite Z');
read(z);
writeln('Vvedite S');
read(s);
x:=(n*z);
writeln('Edinis ',x div z);
writeln('Sdacha ',s mod x);
end.