Ответ с момента начала скачивания Васей данных, до полного их получения Петей пройдёт 349346 (секунд).
program programone;
var
a,ed,des,sot:Integer;
begin
ReadLn(a);
sot:=a div 100;
des:=(a mod 100) div 10;
ed:=a mod 10;
if ed*ed*ed+des*des*des+sot*sot*sot=a then
WriteLn('Число равно сумме кубов своих цифр')
else
WriteLn('Число не равно сумме кубов своих цифр');
end
П-8F, е-5а, р-e0. в-a2, о-ae. е-5а, С-91, е-5а, н-AD. т-E2. я-EF. б-а1, р-е0, я-EF.
1000 0101 0000 0010 0101 1001 0001 0101 0010 0001 0000
<span>Сервер программа должна стоять на серваке (сервере) Это мощный (желательно) комп, включен круглые сутки и постоянно открыт выход в интернет, НО Windows на него ставить не желательно, может "сдохнуть" и тогда появятся недовольные клиенты, лучше ставить Linux, OpenBSD, FreeBsd и т. д.</span>
1. Разностная машина Беббиджа должна была заменить группу вычислителей, которые аккуратно склвдывали и вычитали числа. Поэтому утверждение "Б" - справедливо
2. Подготовка данных с помощью перфокарт, утверждение "А" - справедливо.
3. Утверждение "Г" - спорно, хотя в 2000 году в лондонском Музее науки заработал принтер, придуманный Бэббиджем для своей машины.
Вообще машина проектировалась как механический аппарат предназначенный для автоматизации вычислений путем аппроксимации функций многочленами и вычисления конечных разностей.