Условие

вася выращивает арбузы. он купил

n

арбузов и хочет добыть из них семена.

по статистике в каждом арбузе от

a

до

b

семян. какое максимальное и минимальное количество семян сможет добыть вася?

формат входных данных

с клавиатуры вводятся три целых числа

n

,

a

и

b

(1≤≤104

1

≤

n

≤

10

4

, 1≤≤≤104

1

≤

a

≤

b

≤

10

4

).

формат выходных данных

выведите 2 числа, минимальное и максимальное количество семян.

входные данные выходные данные

10 10 15

100 150

1 2 3

2 3 27 !

Для перевода двоичного числа в десятичное необходимо это число представить в виде суммы произведений степеней основания двоичной системы счисления на соответствующие цифры в разрядах двоичного числа.
Например, требуется перевести двоичное число 10110110 в десятичное. В этом числе 8 цифр и 8 разрядов ( разряды считаются, начиная с нулевого, которому соответствует младший бит). В соответствии с уже известным нам правилом представим его в виде суммы степеней с основанием 2:
101101102 = (1·27)+(0·26)+(1·25)+(1·24)+(0·23)+(1·22)+(1·21)+(0·20) = 128+32+16+4+2 = 18210 Сам попробуй

Program zadanie_1;
Var a,b:integer;
Begin
 Writeln('Введите текущий год');
 Readln(a);
 Writeln('Введите год рождения');
 Writeln('Примечание:Значение текущего года не должно быть меньше значения года рождения, иначе программа не будет исполняться');
 Readln(b);
 If a>b Then Writeln('Количество прожитых лет=',a-b) 
           Else Writeln('Количество прожитых лет=',a);
End.

Program zadanie_2;
Var a,b,s:real;
Begin
 Writeln('Введите два любых числа');
 Readln(a,b);
 s:=a+b;
 If b<0 Then Writeln(a,'+','(',b),')','=',s) else Writeln(a,'+',b,'=',s);
End.