1 МБ = 8 Мбит
Переводим МБ в Мбиты: 10*8=80 Мбит
80/50 = 1.6 сек
8) 1
запредположим вначале он в точке 0,0 выполнив три команды попадет в точку 1,2 следовательно повторив эти движения три раза попадет в точку 3,6, для возврата из которой надо выпонить 1 команду
9) знать бы еще какие команды он может выполнять... пример алгоритма
while 1:
if впереди стена then break
else вперед
поворот направо
while 1:
красить
if впереди стена then break
else вперед
поворот направо
вперед
while 1:
if слева стена then крась; вперед
else break
<span>Программа выводящая одно число: сумму всех чисел , кратных 4 и оканчивающихся на 6.</span>
Var l:integer;
l1:real;
lm:integer;
begin
write('Введите расстояние в сантиметрах ');
read(l);
l1:=l/100;
lm:=trunc(l1);//округляет значение до близжайшего вычитая из него -0.5
writeln(lm,' метров');
<span>end.</span>
Program dlksjijh;
var
A: array[1..40] of integer;
i: integer;
begin
randomize;
writeln('исходные данные:');
for i := 1 to 40 do
begin
A[i] := Random(21);
write(A[i], ' ');
end;
writeln;
writeln('преобрезованный массив:');
for i := 1 to 40 do
begin
if A[i] mod 2 = 0 then
A[i] := Round(A[i]/2)
else
A[i] := A[i] * 3;
write(A[i], ' ');
end;
end.
Имена математических операций - с прописной буквы, и, поскольку есть Random(), то самой первой строкой программы должна быть команда randomize, то есть активация генератора случайных чисел.
У меня работает.