42*34=1428 байт на 1 лист
12*1428=17136 байт на 1 тетрадь
17136/1024~17,6 Кб
1,44~1475 Кб
1475/17,6~84 тетради
Ответ: 84 тетради
А < 7 значит проходим по алгоритму. мы к а:=а+1 (2+1); и b:=b+а (0+3 (3 потому что мы к а прибавили 1)). а < 7 значит проходим по алгоритму. мы к а:=а+1 (3+1); и b:=b+а (3+4). а < 7 значит проходим по алгоритму. мы к а:=а+1 (4+1); и b:=b+а (7+5). а < 7 значит проходим по алгоритму. мы к а:=а+1 (5+1); и b:=b+а (12+6). а < 7 значит проходим по алгоритму. мы к а:=а+1 (6+1); и b:=b+а (18+7). а уже не меньше 7 оно равно 7 значит мы вышли из цикла а=7 и b=25
program zadacha;
Var x,a,b :real;
begin
readln (a,b);
if a<>0 then x:=-b/a;
Writeln ('x= ',x);
end.