Книга - Руслан и Людмила автор А С Пушкин Воронеж год издания 1947г стр -зависит от размера книги а обычно 125
Во вложеном файле приведено решение на языке С++.
А вот на Pascal:
program Znanija;
var a, b, c, n: integer;
begin
read(a);
read(b);
read(c);
n:=(c-a) div b;
writeln();
writeln(n);
end.
Объяснение:
Вариант 6
const
N = 10;
var
a: array[1..N] of integer;
i, max1, max2: byte;
begin
randomize;
for i:=1 to N do begin
a[i] := random(10);
write(a[i]:3);
end;
writeln;
max1 := 1;
for i:=2 to N do
if a[i] > a[max1] then
max1 := i;
if max1=1 then
max2 := 2
else
max2 := 1;
for i:=2 to N do
if i <> max1 then // чтобы пропустить max1
if a[i] > a[max2] then
max2 := i;
writeln(max1,' ', a[max1]);
writeln(max2,' ', a[max2]);
end.
Вариант 8 не получилось
1) V=tv
2048 : 8 = 256 байт/с
16*256 = 4096 байт
2) v=V/t
2 : 4 = 0,5 кб/с
Кажется так