Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
номер 4, так как две собаки в этой части не допущены.
var h,a: integer;
begin
a: =1;
repeat
h: = h+3;
a: =2*a;
writeln('прошло часов - ',h,', амеб - ',a)
until h> =30;
readln;
end.
var x: real; begin read(x); writeln(round(x)); end.
набрать 8л
два раза отлить 3, будет 8-3-3=2л
перелить 2л из 8 в 3
набрать 8
долить из 8 в 3 1л, так чтоб он стал полным. 8-1=7л
Популярные вопросы