11011111 = 223
11011001 = 217
11000011 = 195
11000000 = 192
Var
a1, a2: integer;
begin
a1 := 0;
a2 := 0;
writeln('enter the first value: ');
read(a1);
writeln('enter the second value: ');
read(a2);
if (a1*a2 mod 3 = 0) then
begin
writeln('da');
end
else
writeln('net');
end.
Сначала посчитаем количество операций = 1 000 000 * 3600= 3 600 000 000 операций
теперь посчитаем быстродействие арифмометра = 1/10=0,1 операция в секунду
теперь посчитаем нужное время = 3 600 000 000 / 0,1= 36 000 000 000 секунд или около 1141,5 лет.