Что-то такое получилось, пиши в комменты если что не так:
var
a,b,k:longint;
begin
b:=1;
k:=0;
while b<10000 do
begin
read(a);
b:=b*a;
k:=k+1;
end;
writeln('Kol:',k);
writeln('Number:',b);
readln
end.
80 Мб = 5 * 2^4 Мб = 5 * 2^14 Кб = 5 * 2^24 байт = 5 * 2^27 бит
На то, чтобы передать этот файл из пункта Б в пункт В, необходимо потратить 5 * 2^27 / 2^20 = 5 * 2^7 = 640 секунд
Так как вся передача заняла 13 минут = 780 секунд, то данные из пункта Б в пункт В начали передавать через 780 - 640 = 140 секунд после начала передачи из пункта А (это не противоречит условию, "затем" определяет только порядок, а не то, что из пункта Б в пункт В начали передавать сразу же, как в пункт Б пришёл первый бит от А).
Var n,i,k:integer;
p,pr:set of byte;
function prost(n:integer):boolean;
var j,m:integer;
begin
m:=0;
for j:=2 to trunc(sqrt(n)) do
if n mod j = 0 then inc(m);
prost:=m=0;
end;
begin
readln(n);
writeln('1:');
for i:=2 to n do
if prost(i) then write(i,' ');
writeln;
writeln('2:');
p:=[2..n]; pr:=[];
k:=2;
repeat
while not(k in p) do k:=k+1;
pr:=pr+[k];
i:=k;
repeat
p:=p-[i]; i:=i+k;
until i>n;
until p=[];
for i:=2 to n do
if i in pr then write(i,' ');
writeln;
end.
Пример:
40
<span>1:
2 3 5 7 11 13 17 19 23 29 31 37
2:
2 3 5 7 11 13 17 19 23 29 31 37 </span>
После разработки слайдов необходимо осуществить предварительный просмотр презентации и отредактировать слайды при необходимости. Кроме того, надо произвести настройку презентации. Настройка осуществляется с помощью команд меню Показ слайдов.
Рис. 1.
К настройкам презентации относятся:
<span>Установка параметров показа презентации.Настройка времени показа слайда.Запись речевого сопровождения презентации.Установка управляющих кнопок для осуществления переходов и других эффектов.Настройка эффектов при смене слайдов.Скрыть слайды, но не удалить, т.е. скрытые слайды не должны отображаться при какой-то демонстрации презентации.Настройка порядка следования слайдов для их произвольного показа.</span>Установка параметров показа презентации
В окне диалога Настройка презентации устанавливаются режимы: смена слайдов, параметры показа и т.д.
Рис. 2.<span>Настройка времени показа слайда
</span>
При смене слайдов по времени требуется задать временной интервал показа каждого слайда. Для этого выбирают команду Показ слайдов / Настройка времени. Начнется представление презентации.
Во время презентации (представления информации) в левом верхнем углу экрана появляется счетчик времени с кнопками, с помощью которого управляется и контролируется время показа слайда. После завершения представления презентации редактор отображает презентацию в режиме сортировщика, под каждым слайдом будет указано время его показа.
Рис. 3.
Запись речевого сопровождения презентации описана в разделе <span>Расширенные возможности PowerPoint.</span>