Т.к. всего команд выполнено 40, x из них "Назад 1", а x-8 "Вперёд 2". 2x-8=40, значит 24 команды "Назад 1" и 16 команд "Вперёд 2". Он переместился вперёд на 16*2=32 единиц и назад на 24 единицы, т.е. за выполнение всей программы он переместился вперёд на 32-24=8 единиц. Ответ: Вперёд 8
//PascalABC.NET 3.1 сборка 1200
begin
repeat
var n := Random(1000);
if n mod (5 * 7) = 0 then begin
write(n);
Readln;
end
until false;
end.
10*650=6500 кб * 8= 52000 Кбит
В кодирове ASCII кждый символ кодируется 1 байтом.
4000 байт/128 = 31,25 Кбит
52000+31,25=52031,25 Кбит/8192≈6,35 Мб
t=J/v; t=52031,25 Кбит / 256 Кбит/с ≈ 203,25c
//прога на Pascal`e {бдок-схема в файле}
var
x: int64;
begin
write ('Введите целое число: ');
readln (x);
if x<=38 then write ('Салют') else write ('y = 5x-38 = ', 5*x-38);
end.
Ответ:
5div12 = 0
5 mod 12 = 5
1327div div 10 = 132
Объяснение:
div - целочисленное деление
mod - остаток от целочисленного деления