Машинный код из программы обычно получается с помощью программы-компилятора или программы-транслятора
<span><em>Pascal ABC</em>
var x:integer;
begin
writeln ('Введите четырёхзначное число');
readln(x);
if (x div 1000 <> 0) and (x div 10000 = 0) then begin
if ((x div 100)=(x mod 100)) or (((x div 1000)=(x mod 10)) and (((x div 100) mod 10)=((x mod 100) div 10))) then
writeln ('Является перевёртышем') else
writeln ('Не является перевёртышем');
end else writeln ('Неверный ввод');
end.
</span><span>
</span>
Время передачи файла размером 512Кб через некоторое соединение 2секунды. Найдите объем файла передающегося через это же соединение за 8 секунд. (ответ 2Мб)
Ответ 14831.5429688
Дано
800*600 разрешение65536 палитра16 кадров/сек15 камер слежения
Решениесутки = 86400 сек = 1382400 кадров
глубина пикселя 16 бит
800*600*16=7680000 бит 1 кадр
7680000бит=7500кбит
7500*1382400*15=155520000000кб=151875000мб=148315.429688Гб в сутках
10=148315.429688/x
10*x=148315.429688
148315.429688/10=14831.5429688 Гигабайт в сжатом виде за сутки