<span>419 + например 4559
1319 - т.к. сумма четных цифр дает четное число, а здесь все нечетные
2014 - убывание или числа 2 и 014, а число не может начинаться с 0
1811 - убывание</span><span>
1212 + например 6657
205 - т.к. в порядке неубывания могут стоять только 2 и 05, а на 0 числа не начинаются
322 + 3886
294 - </span>т.к. в порядке неубывания могут стоять только 2 и 94, а сумма 3 чисел не может превышать 27<span>
55 - т.к. все 4 нечетные числа в сумме дают максимум 36, а 5 и 5 невозможно, т.к. 5 не может быть суммой четных чисел
Итого: 3 числа</span>
Путь к файлу не забудь поменять
var
t: text;
st: string;
s, i: integer;
c: char;
begin
s := 0;
st := '';
assign(t, 'ПУТЬ К ФАЙЛУ');
reset(t);
while not eof(t) do
begin
read(t, c);
if (ord(c) <> 13) then
st := st + c
else if TryStrToInt(st, i) then
begin
s := s + i;
st := '';
end
else
st := '';
end;
if TryStrToInt(st, i) then
s := s + i;
close(t);
writeln(s);
end.
5, 4, 2, 3, 1, 6. Складывай всё что в квадратных скобках и умножай на кол-во повторов. Вперед это знак +, назад это -
На листочке всё написанно, но на всякий пожарны диктую ответы. Это48:
4,
6,
5,
4,
7.
Это49:
5,
2,
5,
5,
7.