//PascalABC.Net;
//(c) NaaMan;
var
s, k : integer;
begin
k := 1;
for var i := 1000 to 9999 do begin
s := 0;
for var j := 0 to 3 do begin
s += (i div round(power(10, j)) mod 10)
end;
if (i mod s = 0) then begin
write(i, ' ');
if (k mod 4 = 0) then writeln;
k += 1
end
end
end.
Ответ:
Г после получения нанотехнологий стало возможно использование магнитных носителей информации
Объяснение:
1. Видимо 2 круга никак не пересекающихся друг с другом, один для чет другой для нечет
2. Предикат : все четные числа состоят из множества всех чисел минут множество всех нечетных чисел
А - 0
Б - 101
В - 110
Скажем,
Г - 100
Д - 1110
Е - 1111
1 + 3*3 + 4*2 = 18
Перезагрузи компьютер , если не поможет то включи попробуй , а потом выключи антивирусы.