Ответ:
program HappyTicket;
uses
SysUtils;
var
n1, n2, m1, m2, i, c: Integer;
s: string;
begin
Write ('Введите два номера билета: ');
ReadLn (n1, n2);
if (n1 > 100000) and (n1 < 999999) and (n2 > 100000) and (n2 < 999999) then begin
c := 0;
for i := n1 to n2 do begin
s := IntToStr (i);
m1 := StrToInt (s [1]) + StrToInt (s [2]) + StrToInt (s [3]);
m2 := StrToInt (s [4]) + StrToInt (s [5]) + StrToInt (s [6]);
if m1 = m2 then begin
Write (s, ' '); // для проверки выводятся все билеты. после убрать
Inc (c);
end;
end;
WriteLn;
WriteLn ('Количество = ', c);
end else
WriteLn ('Номера не шестизначные');
ReadLn;
end.
100111=1*2^0+1*2^1+1*2^2+1*2^5=1+2+4+32=39
101=1*2^0+1*2^2=1+4=5
(перевод в десятичную)
39+5=44
39*5=195
ответ: 44 и 195
2 PSD формат, так как файлы Сохраняются в нем
Озеро Байкал считается морем по своим размерам. Там постоянные ветра, дожди, снег и прочее. В прилегающих районах другой климат, так как они отдалены от Байкала.
Это своими словами
Каждой букве соответствует своя цифра
М- 2 О - 0 Л - 3 О-0 К-1 О-0
203010 - получили число в 4-ой системе счисления,переведем его в 10-ю,а после этого в 16-ю
203010 = 1*4 + 3*4^3 + 2*4^5 = 4+192 + 2048 = 2244 в десятичной системе
2244 нужно перевести в 16 и получиться ответ