| Главная » Статьи » Задачи с acm.timus.ru » Пакет решений на 15.03.08 |
1124
| {$N+} Var N,M: Double; Begin Read(N,M); If (M = 1) then begin Writeln(1); Exit; end; If (N = 1) then begin Writeln(0); Exit; end; If M>=N then Writeln(N*2-1-1:0:0) else Writeln(M*2-1:0:0); End. | |
| Категория: Пакет решений на 15.03.08 | Добавил: solver (15.03.2008) | |
| Просмотров: 782 |