Var a,b:integer;
begin
read (a,b);
if a>b then write (' а большее') else write (' b большее');
end.
Если последовательность начинается с положительного элемента, то сумма <span>предшествующих первому положительному элементу членов последовательности равна нулю, поскольку их попросту не существует!</span>
2*80*60*800=7680000
(2*80- сколько всего строк
2*80*60- сколько символов на одной странице
2*80*60=9600
Во всей книге: 9600*800=7680000
Коротко .<span>формирование электронных таблиц.</span>