Есть ответ 👍

A. кола имя входного файла: ain.txt имя выходного файла: aout.txt ограничение по времени: 0,2 секунды ограничение по памяти: 64 мегабайта завод по производству колы изготавливает ее не только для магазинов, но и для всемирно известной сети ресторанов быстрого питания. ежедневно завод отгружает один и тот же объем колы в литрах. служба доставки сети ресторанов обычно использует для транспортировки колы емкости объемом или только 50 литров, или только 70 литров. если доставка осуществляется с емкостей в 50 литров, то для перевозки имеющегося объема колы необходимо a емкостей. а если с емкостей в 70 литров, то необходимо b емкостей. при этом в каждом из случаев одна из емкостей может быть заполнена не полностью. недавно сеть ресторанов решила утвердить новый объем емкостей для доставки колы — 60 литров. сколь- ко емкостей теперь может понадобиться для доставки того же самого объема колы? формат входного файла входные данные содержат 2 числа a и b, расположенных каждое в отдельной строке (1 ≤ a, b ≤ 10 000 000). формат выходного файла выведите все возможные значения для количества емкостей по 60 литров, которые окажутся заполнен- ными (в том числе одна возможно частично), в порядке возрастания или число −1, если значения a и b противоречат друг другу, то есть они были записаны неверно.

166
433
Посмотреть ответы 2

Ответы на вопрос:

Lizka22855
4,7(84 оценок)

var a,b, mina, maxa, minb, maxb, minn, maxx, t, t1, i: longint;

begin  

readln(a); readln(b);

mina: =(a-1)*50+1; maxa: =a*50;

minb: =(b-1)*70+1; maxb: =b*70;

if (mina> maxb) or (minb> maxa) then writeln(-1) else

begin

if mina< minb then minn: =minb else minn: =mina;

if maxa> maxb then maxx: =maxb else maxx: =maxa;

t: =minn div 60;

t1: =maxx div 60;

if (minn mod 60)< > 0 then inc(t);

if (maxx mod 60)< > 0 then inc(t1);

for i: =t to t1 do  

write(i, ' ');

writeln();

end;

end.

не могу сказать верно или нет, так как не проверял а просто написал в блокнотике

Usdied
4,4(39 оценок)

15*0,5 + 10*1,5=19(км) - проехал за 2 часа

Популярно: Математика