Найдем первое число из данного диапазона, кратное семи.
100 / 7 = 14 и остаток 2.
100 + (7-2) = 105. (можно найти это число и другими путями).
И теперь задача сводится к нахождению суммы чисел последовательности 105, 112, ... где последнее число не превышает 200,
// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
Writeln('S=',Range(105,200,7).Sum)
end.
<u><em>Тестовое решение:</em></u>
S=2107
X=28
y=(28 mod 11) +3 ; y=10
x=(10 div 7)+3 ; x=4
c=10+4=14
Program num1;
Uses crt;
Var
a :array [1..10] of integer;
i : integer;
Begin
clrscr;
for i:=1 to 10 do
begin
write('a[',i,']=');readln(a[i])
end;
for i:=1 to 10 do
if a[i]<0 then a[i]:=abs(a[i]);
writeln('********************************');
for i:=1 to 10 do
writeln('a[',i,']=',a[i]);
End.
1) 2*4=8
2)8-3=5
3)5*4=20
4)20-3=17
5)17-3=14
Ответ: 12122
Ответ:
import itertools
import re
lines = []
with open("input.txt", "r") as f:
line = f.read()
for string in line.split('\n'):
if len(string) > 1:
a = [item for item in re.compile('\d+').findall(string)]
a = len(set(a))
lines.append(a)
with open(r"output.txt", "w") as file:
for line in lines:
file.write(str(line) + '\n')
Объяснение:
Python 3.7