Миле не хватило 2 рублей, следовательно если Оля и Ира добавили бы эти 2 рубля
альбом можно было бы купить, но по условию этого не случилось.
значит у Оли с Ирой вместе не было 2 рублей.
если у Оли х рублей, а у иры y/
тогда х+34=y+35
x+y<2
x-y=1
2x<3
x<1,5
если стоимость альбома целое тогда альбом стоит 35.
у Иры 33. у оли -1 рубль.
если ответ нецелое то стоимость Альбома 35<=S<35,5
Несколько файлов могут передаваться по одной линии
1)
uses GraphABC;
begin
Window.Title := 'Circle';
var x,y,r,i: integer;
Brush.Color := clGreen;
y:=20;
x:=70;
r:=25;
for i := 1 to 7 do
Circle(x,y+i*60,r);
end.
2)
uses GraphABC;
begin
Window.Title := 'Circle';
var x,y,r,i: integer;
Brush.Color := clGreen;
y:=20;
x:=20;
r:=30;
for i := 1 to 5 do
Circle(x+i*70,y+i*70,r);
end.
3)
uses GraphABC;
begin
Window.Title := 'Circle';
var x,y,r,i: integer;
Brush.Color := clGreen;
y:=70;
x:=30;
r:=60;
for i := 1 to 5 do
Circle(x+i*60,y,r);
end.
Решение во вложении
..............................
Кроме того, что ее можно перенастроить на любую из команд, какую сам захочешь, она также возвращает в начало списка, страницы, текста и того подобного.