Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
объяснение:
113(10)=161(8)
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.
var s,r: real;
read(r);
s: =pi*sqr(r);
writeln(s: 0: 4);
Популярные вопросы