Program BapeHbE;
Var
L, B, S : integer;
O : real;
Begin
Writeln (' Skolko litrov varenya v tazy?');
Readln (L);
Writeln (' Kakaya emkost banok?');
Readln (B);
S:= L DIV B;
O:= L MOD B;
writeln (' Polnih banok_', S);
writeln (' Litrov ostaloc_', O:2:2);
readln;
End.
Program BapeHbE;
Var
L, B, S : integer;
O : real;
Begin
Writeln (' Skolko litrov varenya v tazy?');
Readln (L);
Writeln (' Kakaya emkost banok?');
Readln (B);
S:= L DIV B;
O:= L MOD B;
writeln (' Polnih banok_', S);
writeln (' Litrov ostaloc_', O:2:2);
readln;
End.